(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[   1281308,      25527]
NotebookOptionsPosition[   1265816,      25053]
NotebookOutlinePosition[   1266503,      25076]
CellTagsIndexPosition[   1266460,      25073]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["\<\
This is Online Appendix of the paper \[OpenCurlyDoubleQuote]Price-cost tests \
and loyalty discounts,\[CloseCurlyDoubleQuote] by Giacomo Calzolari and \
Vincenzo Denicol\[OGrave]\
\>", "Title",
 CellChangeTimes->{{3.660977104424218*^9, 3.6609771218504496`*^9}, {
   3.661752039463211*^9, 3.6617520436996346`*^9}, {3.661837603084977*^9, 
   3.66183761262193*^9}, 3.66203441813704*^9, {3.6944998903714027`*^9, 
   3.6944998974070024`*^9}, 3.694499960626602*^9, 3.7089233220842695`*^9, 
   3.715573920356633*^9, {3.715574146100233*^9, 3.7155741500470333`*^9}, {
   3.717386853964338*^9, 3.7173868541468287`*^9}, {3.726915409974795*^9, 
   3.7269154172941947`*^9}, {3.7271596670614395`*^9, 
   3.7271596739714394`*^9}, {3.732936172520488*^9, 3.732936188380488*^9}, 
   3.732973868411488*^9, {3.74038126695679*^9, 3.7403812728163795`*^9}}],

Cell[CellGroupData[{

Cell["Defining payoffs", "Section",
 CellChangeTimes->{{3.6609772427701063`*^9, 3.660977245635023*^9}, {
  3.6953576318725967`*^9, 3.6953576323561993`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Buyer", "'"}], "s", " ", "utility"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"v", "=", " ", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"q1", " ", "+", " ", "q2"}], ")"}], " ", "-", 
      RowBox[{
       RowBox[{"1", "/", "2"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"q1", "^", "2"}], " ", "+", " ", 
         RowBox[{"q2", "^", "2"}]}], ")"}]}], " ", "-", " ", 
      RowBox[{"\[Gamma]", "  ", "q1", "  ", "q2"}]}]}], ";"}], " ", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ve1", "=", 
     RowBox[{"v", "/.", 
      RowBox[{"q2", "\[Rule]", "0"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ve2", "=", 
     RowBox[{"v", "/.", 
      RowBox[{"q1", "\[Rule]", "0"}]}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{"Parameters", ":", " ", 
      RowBox[{"c", " ", 
       RowBox[{"in", " ", "[", 
        RowBox[{"0", ",", "1"}], "]"}]}]}], ",", " ", 
     RowBox[{"\[Gamma]", " ", 
      RowBox[{"in", " ", "[", 
       RowBox[{"0", ",", "1"}], "]"}]}]}], "*)"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"P1", "=", 
     RowBox[{
      RowBox[{"p1", " ", "q1"}], "+", "F1"}]}], ";"}], " ", 
   RowBox[{"(*", 
    RowBox[{
    "Two", " ", "part", " ", "tariff", " ", "of", " ", "dominant", " ", 
     "firm", " ", "1"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"P2", "=", 
     RowBox[{
      RowBox[{"p2", " ", "q2"}], "+", "F2"}]}], ";"}], " ", 
   RowBox[{"(*", 
    RowBox[{
    "Two", " ", "part", " ", "tariff", " ", "of", " ", "inefficient", " ", 
     "firm", " ", "2"}], "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.6430838325424433`*^9, 3.6430839031724434`*^9}, {
   3.6430888508859434`*^9, 3.643088853655944*^9}, {3.6430914144819436`*^9, 
   3.6430914941719437`*^9}, {3.643091560221944*^9, 3.6430915653619432`*^9}, {
   3.6430916331619434`*^9, 3.6430916468819437`*^9}, {3.643091685051944*^9, 
   3.6430917525619435`*^9}, {3.6430917968219433`*^9, 
   3.6430919083839436`*^9}, {3.64353514493536*^9, 3.6435351587056355`*^9}, 
   3.6609772896074085`*^9, {3.660977321278571*^9, 3.6609773565861654`*^9}, {
   3.6609774625639906`*^9, 3.6609774807231283`*^9}, {3.660977589162599*^9, 
   3.660977621661601*^9}, {3.660977861598258*^9, 3.6609779123098993`*^9}, {
   3.660978175796667*^9, 3.6609782413818645`*^9}, {3.6609831638312426`*^9, 
   3.6609831935685606`*^9}, {3.660993006842454*^9, 3.6609930396874056`*^9}, {
   3.661841060289663*^9, 3.661841338398471*^9}, {3.6620345916328564`*^9, 
   3.662034611425027*^9}, {3.6658051515536356`*^9, 3.6658051573204913`*^9}, {
   3.665892182883977*^9, 3.665892184233878*^9}, {3.694500337216502*^9, 
   3.6945003422865024`*^9}, {3.715574974757633*^9, 3.7155749936582336`*^9}, {
   3.7155752142106333`*^9, 3.7155752156458335`*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Preparing", " ", "payoffs", " ", "for", " ", "the", " ", "different", " ", 
   "cases"}], "*)"}]], "Input",
 CellChangeTimes->{{3.7155750071974335`*^9, 3.7155750154608335`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Common", " ", "representation"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"tmpu", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{"D", "[", 
            RowBox[{
             RowBox[{"v", "-", "P1", "-", "P2"}], ",", "q1"}], "]"}], 
           "\[Equal]", "0"}], ",", 
          RowBox[{
           RowBox[{"D", "[", 
            RowBox[{
             RowBox[{"v", "-", "P1", "-", "P2"}], ",", "q2"}], "]"}], 
           "\[Equal]", "0"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"q1", ",", "q2"}], "}"}]}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"q1NE", "=", 
    RowBox[{"tmpu", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"q2NE", "=", 
    RowBox[{"tmpu", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.661841409233554*^9, 3.6618414808477144`*^9}, 
   3.6945003744835024`*^9, {3.715575021360833*^9, 3.7155750378690333`*^9}, {
   3.7155752496558332`*^9, 3.715575252775833*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
   RowBox[{"p2", " ", "\[Gamma]"}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   SuperscriptBox["\[Gamma]", "2"]}]]], "Output",
 CellChangeTimes->{{3.7155752550846334`*^9, 3.7155752620130334`*^9}, 
   3.7155753261006336`*^9, 3.7269154764671946`*^9, 3.7269841650977144`*^9, 
   3.7271596827714396`*^9, 3.727171863763177*^9, 3.7272625079423475`*^9, {
   3.7319058432616606`*^9, 3.73190585899866*^9}, 3.732936208634488*^9, 
   3.7341921091236453`*^9, 3.7341921497596874`*^9, 3.7344407013946433`*^9, 
   3.740070659951468*^9, 3.740381284816286*^9, 3.740568315306224*^9, 
   3.740740914997501*^9, 3.740801144378257*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "1"}], "+", "p2", "+", "\[Gamma]", "-", 
   RowBox[{"p1", " ", "\[Gamma]"}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   SuperscriptBox["\[Gamma]", "2"]}]]], "Output",
 CellChangeTimes->{{3.7155752550846334`*^9, 3.7155752620130334`*^9}, 
   3.7155753261006336`*^9, 3.7269154764671946`*^9, 3.7269841650977144`*^9, 
   3.7271596827714396`*^9, 3.727171863763177*^9, 3.7272625079423475`*^9, {
   3.7319058432616606`*^9, 3.73190585899866*^9}, 3.732936208634488*^9, 
   3.7341921091236453`*^9, 3.7341921497596874`*^9, 3.7344407013946433`*^9, 
   3.740070659951468*^9, 3.740381284816286*^9, 3.740568315306224*^9, 
   3.740740914997501*^9, 3.7408011443792973`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Non", " ", "exclusive", " ", "payoffs"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"v", " ", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{"p2", " ", "q2"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"ProfitBNE", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", "%", "]"}], "-", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]"}], ")"}], 
      RowBox[{"(", 
       RowBox[{"F1", "+", "F2"}], ")"}]}]}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"P1", "-", 
      RowBox[{"c", " ", "q1"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Profit1NE", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"P2", "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}], " ", "q2"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Profit2NE", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.6618428945950747`*^9, 3.661842917166332*^9}, {
   3.662034832461458*^9, 3.6620348502522883`*^9}, 3.6620353865761323`*^9, {
   3.6658055463931975`*^9, 3.6658056636679363`*^9}, {3.665809481805315*^9, 
   3.6658094950210147`*^9}, {3.6658922071559153`*^9, 3.66589221508051*^9}, {
   3.694500397378702*^9, 3.6945004052597027`*^9}, {3.715575055077833*^9, 
   3.715575082505433*^9}, 3.7155753079382334`*^9, {3.727262495198022*^9, 
   3.727262500948824*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", 
   FractionBox[
    RowBox[{"2", "-", 
     RowBox[{"2", " ", "p1"}], "+", 
     SuperscriptBox["p1", "2"], "-", 
     RowBox[{"2", " ", "p2"}], "+", 
     SuperscriptBox["p2", "2"], "-", 
     RowBox[{"2", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "p1"}], ")"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "\[Gamma]"}]}], 
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "-", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"F1", "+", "F2"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}]], "Output",
 CellChangeTimes->{
  3.7155753275514336`*^9, 3.726915477919995*^9, 3.726984172273714*^9, 
   3.7271596866234393`*^9, 3.7271718639489374`*^9, 3.7272625095837345`*^9, {
   3.7319058433446603`*^9, 3.7319058590856605`*^9}, 3.732936208712488*^9, 
   3.7341921092890964`*^9, 3.7341921498906307`*^9, 3.734440701529038*^9, 
   3.740070660116906*^9, 3.740381284936604*^9, 3.7405683155067244`*^9, 
   3.740740915188354*^9, 3.7408011445416927`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{
    RowBox[{"-", "c"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
      RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}]}], "+", 
   RowBox[{"p1", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
      RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}]}], "+", 
   RowBox[{"F1", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   SuperscriptBox["\[Gamma]", "2"]}]]], "Output",
 CellChangeTimes->{
  3.7155753275514336`*^9, 3.726915477919995*^9, 3.726984172273714*^9, 
   3.7271596866234393`*^9, 3.7271718639489374`*^9, 3.7272625095837345`*^9, {
   3.7319058433446603`*^9, 3.7319058590856605`*^9}, 3.732936208712488*^9, 
   3.7341921092890964`*^9, 3.7341921498906307`*^9, 3.734440701529038*^9, 
   3.740070660116906*^9, 3.740381284936604*^9, 3.7405683155067244`*^9, 
   3.740740915188354*^9, 3.7408011445888166`*^9}],

Cell[BoxData[
 RowBox[{"F2", "-", 
  FractionBox[
   RowBox[{
    RowBox[{"(", 
     RowBox[{"c", "+", "d", "-", "p2"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p2", "+", "\[Gamma]", "-", 
      RowBox[{"p1", " ", "\[Gamma]"}]}], ")"}]}], 
   RowBox[{
    RowBox[{"-", "1"}], "+", 
    SuperscriptBox["\[Gamma]", "2"]}]]}]], "Output",
 CellChangeTimes->{
  3.7155753275514336`*^9, 3.726915477919995*^9, 3.726984172273714*^9, 
   3.7271596866234393`*^9, 3.7271718639489374`*^9, 3.7272625095837345`*^9, {
   3.7319058433446603`*^9, 3.7319058590856605`*^9}, 3.732936208712488*^9, 
   3.7341921092890964`*^9, 3.7341921498906307`*^9, 3.734440701529038*^9, 
   3.740070660116906*^9, 3.740381284936604*^9, 3.7405683155067244`*^9, 
   3.740740915188354*^9, 3.7408011446890836`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Monopoly", "/", "Exclusive"}], " ", "firm", " ", "1"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"q1e", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"ve1", "-", 
            RowBox[{"p1", " ", "q1"}]}], ",", "q1"}], "]"}], "\[Equal]", 
         "0"}], ",", "q1"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"ve1", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Mu]"}], ")"}], "F1"}]}], "/.", 
     RowBox[{"q1", "\[Rule]", "q1e"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"ProfitBE1", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"P1", "-", 
      RowBox[{"c", " ", "q1"}]}], "/.", 
     RowBox[{"q1", "\[Rule]", "q1e"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Profit1E", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.6618416250611343`*^9, 3.6618416551811457`*^9}, {
   3.6618417106166887`*^9, 3.661841734361063*^9}, {3.661841787202347*^9, 
   3.6618418298476105`*^9}, 3.6618424115557756`*^9, {3.661842508356455*^9, 
   3.6618425202936487`*^9}, {3.6618425787044888`*^9, 
   3.6618426384254603`*^9}, {3.662034737974583*^9, 3.6620347720302444`*^9}, {
   3.662034881715713*^9, 3.6620349043757877`*^9}, {3.662035074730192*^9, 
   3.6620350748943014`*^9}, {3.6620351135749917`*^9, 
   3.6620351146517053`*^9}, {3.6620353137008734`*^9, 
   3.6620353147165484`*^9}, {3.662464931076492*^9, 3.6624649325494823`*^9}, {
   3.665805682698654*^9, 3.6658057952208548`*^9}, {3.665809318341604*^9, 
   3.6658093189960465`*^9}, {3.665809515180071*^9, 3.665809529464613*^9}, {
   3.6945004542043023`*^9, 3.694500456717902*^9}, {3.7155750935522337`*^9, 
   3.7155751040238333`*^9}, 3.7155753079538336`*^9, {3.7272625302343283`*^9, 
   3.727262531338964*^9}}],

Cell[BoxData[
 RowBox[{"1", "-", "p1"}]], "Output",
 CellChangeTimes->{
  3.6618416562042484`*^9, {3.661841712589886*^9, 3.6618417350811353`*^9}, 
   3.661841830749701*^9, 3.661842524582077*^9, {3.661842623626981*^9, 
   3.661842638874505*^9}, 3.6618627077144775`*^9, 3.6620347728748064`*^9, 
   3.6620349129444885`*^9, 3.6620350753035717`*^9, 3.662035115435226*^9, 
   3.662035315621153*^9, 3.662035389688198*^9, 3.6620968054633427`*^9, 
   3.662275318442032*^9, 3.662382105690009*^9, {3.6624406717024727`*^9, 
   3.662440674705494*^9}, 3.662464837627984*^9, {3.6624649335091205`*^9, 
   3.662464949578925*^9}, 3.6624726064809656`*^9, 3.6658051762711515`*^9, 
   3.665805774309883*^9, 3.665805898173001*^9, 3.6658093195684223`*^9, 
   3.665809530107039*^9, 3.6658921954613705`*^9, 3.66589496390954*^9, 
   3.665895032254822*^9, 3.6659172267575717`*^9, 3.6659822024177504`*^9, 
   3.6659898018316154`*^9, 3.6660736569531717`*^9, 3.6665094553353047`*^9, 
   3.6666723897773466`*^9, 3.6670309249857903`*^9, 3.6671096844605637`*^9, 
   3.66727748182802*^9, {3.6945004344301023`*^9, 3.694500458605502*^9}, {
   3.694511644353854*^9, 3.69451164826036*^9}, 3.694752092868987*^9, 
   3.6947759032366343`*^9, 3.6950103735482254`*^9, 3.695357262230315*^9, 
   3.6959603564794245`*^9, 3.6959772553917246`*^9, 3.6971687883982286`*^9, 
   3.6971758229400697`*^9, 3.6972579689553614`*^9, 3.708680113262477*^9, 
   3.715437287610278*^9, 3.715437961480961*^9, 3.7154381390177507`*^9, 
   3.715575107799033*^9, 3.7155753393314333`*^9, 3.7269154796203947`*^9, 
   3.7269841826945143`*^9, 3.727159690147439*^9, 3.727171864187251*^9, {
   3.727262516328251*^9, 3.7272625317192407`*^9}, {3.7319058434756603`*^9, 
   3.7319058592216606`*^9}, 3.732936208839488*^9, 3.7341921099271755`*^9, 
   3.7341921500886865`*^9, 3.7344407017245226`*^9, 3.7400706603555403`*^9, 
   3.740381285115079*^9, 3.7405683157514195`*^9, 3.740740915777772*^9, 
   3.7408011447703*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "p1"}], ")"}], "2"], "-", 
    RowBox[{"2", " ", "F1", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{
  3.6618416562042484`*^9, {3.661841712589886*^9, 3.6618417350811353`*^9}, 
   3.661841830749701*^9, 3.661842524582077*^9, {3.661842623626981*^9, 
   3.661842638874505*^9}, 3.6618627077144775`*^9, 3.6620347728748064`*^9, 
   3.6620349129444885`*^9, 3.6620350753035717`*^9, 3.662035115435226*^9, 
   3.662035315621153*^9, 3.662035389688198*^9, 3.6620968054633427`*^9, 
   3.662275318442032*^9, 3.662382105690009*^9, {3.6624406717024727`*^9, 
   3.662440674705494*^9}, 3.662464837627984*^9, {3.6624649335091205`*^9, 
   3.662464949578925*^9}, 3.6624726064809656`*^9, 3.6658051762711515`*^9, 
   3.665805774309883*^9, 3.665805898173001*^9, 3.6658093195684223`*^9, 
   3.665809530107039*^9, 3.6658921954613705`*^9, 3.66589496390954*^9, 
   3.665895032254822*^9, 3.6659172267575717`*^9, 3.6659822024177504`*^9, 
   3.6659898018316154`*^9, 3.6660736569531717`*^9, 3.6665094553353047`*^9, 
   3.6666723897773466`*^9, 3.6670309249857903`*^9, 3.6671096844605637`*^9, 
   3.66727748182802*^9, {3.6945004344301023`*^9, 3.694500458605502*^9}, {
   3.694511644353854*^9, 3.69451164826036*^9}, 3.694752092868987*^9, 
   3.6947759032366343`*^9, 3.6950103735482254`*^9, 3.695357262230315*^9, 
   3.6959603564794245`*^9, 3.6959772553917246`*^9, 3.6971687883982286`*^9, 
   3.6971758229400697`*^9, 3.6972579689553614`*^9, 3.708680113262477*^9, 
   3.715437287610278*^9, 3.715437961480961*^9, 3.7154381390177507`*^9, 
   3.715575107799033*^9, 3.7155753393314333`*^9, 3.7269154796203947`*^9, 
   3.7269841826945143`*^9, 3.727159690147439*^9, 3.727171864187251*^9, {
   3.727262516328251*^9, 3.7272625317192407`*^9}, {3.7319058434756603`*^9, 
   3.7319058592216606`*^9}, 3.732936208839488*^9, 3.7341921099271755`*^9, 
   3.7341921500886865`*^9, 3.7344407017245226`*^9, 3.7400706603555403`*^9, 
   3.740381285115079*^9, 3.7405683157514195`*^9, 3.740740915777772*^9, 
   3.740801144828455*^9}],

Cell[BoxData[
 RowBox[{"F1", "+", 
  RowBox[{"c", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "p1"}], ")"}]}], "+", "p1", "-", 
  SuperscriptBox["p1", "2"]}]], "Output",
 CellChangeTimes->{
  3.6618416562042484`*^9, {3.661841712589886*^9, 3.6618417350811353`*^9}, 
   3.661841830749701*^9, 3.661842524582077*^9, {3.661842623626981*^9, 
   3.661842638874505*^9}, 3.6618627077144775`*^9, 3.6620347728748064`*^9, 
   3.6620349129444885`*^9, 3.6620350753035717`*^9, 3.662035115435226*^9, 
   3.662035315621153*^9, 3.662035389688198*^9, 3.6620968054633427`*^9, 
   3.662275318442032*^9, 3.662382105690009*^9, {3.6624406717024727`*^9, 
   3.662440674705494*^9}, 3.662464837627984*^9, {3.6624649335091205`*^9, 
   3.662464949578925*^9}, 3.6624726064809656`*^9, 3.6658051762711515`*^9, 
   3.665805774309883*^9, 3.665805898173001*^9, 3.6658093195684223`*^9, 
   3.665809530107039*^9, 3.6658921954613705`*^9, 3.66589496390954*^9, 
   3.665895032254822*^9, 3.6659172267575717`*^9, 3.6659822024177504`*^9, 
   3.6659898018316154`*^9, 3.6660736569531717`*^9, 3.6665094553353047`*^9, 
   3.6666723897773466`*^9, 3.6670309249857903`*^9, 3.6671096844605637`*^9, 
   3.66727748182802*^9, {3.6945004344301023`*^9, 3.694500458605502*^9}, {
   3.694511644353854*^9, 3.69451164826036*^9}, 3.694752092868987*^9, 
   3.6947759032366343`*^9, 3.6950103735482254`*^9, 3.695357262230315*^9, 
   3.6959603564794245`*^9, 3.6959772553917246`*^9, 3.6971687883982286`*^9, 
   3.6971758229400697`*^9, 3.6972579689553614`*^9, 3.708680113262477*^9, 
   3.715437287610278*^9, 3.715437961480961*^9, 3.7154381390177507`*^9, 
   3.715575107799033*^9, 3.7155753393314333`*^9, 3.7269154796203947`*^9, 
   3.7269841826945143`*^9, 3.727159690147439*^9, 3.727171864187251*^9, {
   3.727262516328251*^9, 3.7272625317192407`*^9}, {3.7319058434756603`*^9, 
   3.7319058592216606`*^9}, 3.732936208839488*^9, 3.7341921099271755`*^9, 
   3.7341921500886865`*^9, 3.7344407017245226`*^9, 3.7400706603555403`*^9, 
   3.740381285115079*^9, 3.7405683157514195`*^9, 3.740740915777772*^9, 
   3.740801144830462*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Monopoly", "/", "Exclusive"}], " ", "firm", " ", "2"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"q2e", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{
           RowBox[{"ve2", "-", 
            RowBox[{"p2", " ", "q2"}]}], ",", "q2"}], "]"}], "\[Equal]", 
         "0"}], ",", "q2"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{"ve2", "-", 
       RowBox[{"p2", " ", "q2"}], "-", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}], "F2"}]}], "/.", 
      RowBox[{"q2", "\[Rule]", "q2e"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"ProfitBE2", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"P2", "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}], " ", "q2"}]}], "/.", 
     RowBox[{"q2", "\[Rule]", "q2e"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Profit2E", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.6658095349082527`*^9, 3.665809545547369*^9}, {
   3.6945004485551023`*^9, 3.6945004506611023`*^9}, {3.7155751129412336`*^9, 
   3.7155751237852335`*^9}, 3.7155753079694333`*^9, {3.7272625389304047`*^9, 
   3.7272625409812365`*^9}}],

Cell[BoxData[
 RowBox[{"1", "-", "p2"}]], "Output",
 CellChangeTimes->{
  3.665809546881248*^9, 3.6658922189941225`*^9, 3.665894964001602*^9, 
   3.6658950323308725`*^9, 3.6659172268635826`*^9, 3.6659822025127597`*^9, 
   3.66598980387382*^9, 3.666073657042181*^9, 3.6665094554263144`*^9, 
   3.6666723898543463`*^9, 3.667030925070799*^9, 3.6671096845545635`*^9, 
   3.6672774819200296`*^9, 3.6945004639113026`*^9, {3.69451164444761*^9, 
   3.6945116483384895`*^9}, 3.6947520929001865`*^9, 3.6947759033757277`*^9, 
   3.695010373579426*^9, 3.695357262261516*^9, 3.6959603565106244`*^9, 
   3.6959772554229245`*^9, 3.697168788429428*^9, 3.6971758229712696`*^9, 
   3.697257969002161*^9, 3.708680113856998*^9, 3.715437287672779*^9, 
   3.7154379615434675`*^9, 3.7154381390646305`*^9, 3.7155751248772335`*^9, 
   3.7155753574958334`*^9, 3.726915769534995*^9, 3.7269841884041147`*^9, 
   3.727159692639439*^9, 3.7271718644257*^9, 3.7272625422618723`*^9, {
   3.7319058435096607`*^9, 3.7319058592526608`*^9}, 3.732936208869488*^9, 
   3.73419211021439*^9, 3.7341921501846347`*^9, 3.734440701789694*^9, 
   3.7400706605189753`*^9, 3.7403812851712284`*^9, 3.7405683159298525`*^9, 
   3.7407409162551413`*^9, 3.7408011449046564`*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "p2"}], ")"}], "2"], "-", 
    RowBox[{"2", " ", "F2", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{
  3.665809546881248*^9, 3.6658922189941225`*^9, 3.665894964001602*^9, 
   3.6658950323308725`*^9, 3.6659172268635826`*^9, 3.6659822025127597`*^9, 
   3.66598980387382*^9, 3.666073657042181*^9, 3.6665094554263144`*^9, 
   3.6666723898543463`*^9, 3.667030925070799*^9, 3.6671096845545635`*^9, 
   3.6672774819200296`*^9, 3.6945004639113026`*^9, {3.69451164444761*^9, 
   3.6945116483384895`*^9}, 3.6947520929001865`*^9, 3.6947759033757277`*^9, 
   3.695010373579426*^9, 3.695357262261516*^9, 3.6959603565106244`*^9, 
   3.6959772554229245`*^9, 3.697168788429428*^9, 3.6971758229712696`*^9, 
   3.697257969002161*^9, 3.708680113856998*^9, 3.715437287672779*^9, 
   3.7154379615434675`*^9, 3.7154381390646305`*^9, 3.7155751248772335`*^9, 
   3.7155753574958334`*^9, 3.726915769534995*^9, 3.7269841884041147`*^9, 
   3.727159692639439*^9, 3.7271718644257*^9, 3.7272625422618723`*^9, {
   3.7319058435096607`*^9, 3.7319058592526608`*^9}, 3.732936208869488*^9, 
   3.73419211021439*^9, 3.7341921501846347`*^9, 3.734440701789694*^9, 
   3.7400706605189753`*^9, 3.7403812851712284`*^9, 3.7405683159298525`*^9, 
   3.7407409162551413`*^9, 3.7408011449548273`*^9}],

Cell[BoxData[
 RowBox[{"F2", "+", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"c", "+", "d"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "p2"}], ")"}]}], "-", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "p2"}]}]], "Output",
 CellChangeTimes->{
  3.665809546881248*^9, 3.6658922189941225`*^9, 3.665894964001602*^9, 
   3.6658950323308725`*^9, 3.6659172268635826`*^9, 3.6659822025127597`*^9, 
   3.66598980387382*^9, 3.666073657042181*^9, 3.6665094554263144`*^9, 
   3.6666723898543463`*^9, 3.667030925070799*^9, 3.6671096845545635`*^9, 
   3.6672774819200296`*^9, 3.6945004639113026`*^9, {3.69451164444761*^9, 
   3.6945116483384895`*^9}, 3.6947520929001865`*^9, 3.6947759033757277`*^9, 
   3.695010373579426*^9, 3.695357262261516*^9, 3.6959603565106244`*^9, 
   3.6959772554229245`*^9, 3.697168788429428*^9, 3.6971758229712696`*^9, 
   3.697257969002161*^9, 3.708680113856998*^9, 3.715437287672779*^9, 
   3.7154379615434675`*^9, 3.7154381390646305`*^9, 3.7155751248772335`*^9, 
   3.7155753574958334`*^9, 3.726915769534995*^9, 3.7269841884041147`*^9, 
   3.727159692639439*^9, 3.7271718644257*^9, 3.7272625422618723`*^9, {
   3.7319058435096607`*^9, 3.7319058592526608`*^9}, 3.732936208869488*^9, 
   3.73419211021439*^9, 3.7341921501846347`*^9, 3.734440701789694*^9, 
   3.7400706605189753`*^9, 3.7403812851712284`*^9, 3.7405683159298525`*^9, 
   3.7407409162551413`*^9, 3.7408011449567966`*^9}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Exclusive contracts prohibited", "Section",
 CellChangeTimes->{{3.6609916121591845`*^9, 3.6609916182042265`*^9}, 
   3.6670309380680985`*^9, {3.7155751406110334`*^9, 3.7155751476934333`*^9}, {
   3.7155803227312336`*^9, 3.7155803251862335`*^9}, 3.7329362266444883`*^9}],

Cell[CellGroupData[{

Cell["Pure strategies", "Subsubsection",
 CellChangeTimes->{{3.732936317245488*^9, 3.732936320204488*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "We", " ", "first", " ", "study", " ", "the", " ", "case", " ", "in", " ", 
   "in", " ", "which", " ", "the", " ", "capacity", " ", "constraint", " ", 
   "is", " ", "not", " ", "binding", " ", "so", " ", "that", " ", "the", " ", 
   "equilibrium", " ", "is", " ", "in", " ", "pure", " ", 
   RowBox[{"strategies", "."}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.732937553852488*^9, 3.7329375803104877`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "two", " ", "firms", " ", "will", " ", "set", " ", "the", " ", 
    "fixed", " ", "fees", " ", "so", " ", "that", " ", "they", " ", "extract",
     " ", "the", " ", "bilateral", " ", "surplus"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"tmpF", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"ProfitBE1", "\[Equal]", "ProfitBNE"}], ",", 
          RowBox[{"ProfitBE2", "\[Equal]", "ProfitBNE"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"F1", ",", "F2"}], "}"}]}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"F1dtmp", "=", 
    RowBox[{"tmpF", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"F2dtmp", "=", 
    RowBox[{"tmpF", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.662034945308031*^9, 3.6620350110658264`*^9}, {
   3.6620354022755737`*^9, 3.662035513523673*^9}, {3.6658052167752223`*^9, 
   3.665805222902317*^9}, 3.6670309380690985`*^9, {3.694501496549402*^9, 
   3.6945015038346024`*^9}, {3.6945016979298024`*^9, 
   3.6945017018454027`*^9}, {3.7155753697820334`*^9, 3.7155753877988334`*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
      RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}], "2"], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{3.7155753904196334`*^9, 3.726915826414195*^9, 
  3.7269841934273143`*^9, 3.727159694857439*^9, 3.7271718647269974`*^9, 
  3.727262549563506*^9, 3.7319058435726604`*^9, 3.7319058809576607`*^9, 
  3.732936329939488*^9, 3.734192118234872*^9, 3.7341921527718115`*^9, 
  3.7344407018960094`*^9, 3.7400706607015047`*^9, 3.7403812852715263`*^9, 
  3.7405683161444206`*^9, 3.740740916538311*^9, 3.740801145060117*^9}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p2", "+", "\[Gamma]", "-", 
      RowBox[{"p1", " ", "\[Gamma]"}]}], ")"}], "2"], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{3.7155753904196334`*^9, 3.726915826414195*^9, 
  3.7269841934273143`*^9, 3.727159694857439*^9, 3.7271718647269974`*^9, 
  3.727262549563506*^9, 3.7319058435726604`*^9, 3.7319058809576607`*^9, 
  3.732936329939488*^9, 3.734192118234872*^9, 3.7341921527718115`*^9, 
  3.7344407018960094`*^9, 3.7400706607015047`*^9, 3.7403812852715263`*^9, 
  3.7405683161444206`*^9, 3.740740916538311*^9, 3.740801145062076*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Substituting", " ", "the", " ", "fixed", " ", "fees", " ", "in", " ", 
     "the", " ", "profits"}], ",", " ", 
    RowBox[{
    "we", " ", "determine", " ", "the", " ", "equilibrium", " ", "marginal", 
     " ", "prices"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Profit1NEtmp", "=", 
     RowBox[{"Profit1NE", "/.", 
      RowBox[{"F1", "\[Rule]", "F1dtmp"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Profit2NEtmp", "=", 
     RowBox[{"Profit2NE", "/.", 
      RowBox[{"F2", "\[Rule]", "F2dtmp"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tmpp", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{"D", "[", 
            RowBox[{"Profit1NEtmp", ",", "p1"}], "]"}], "\[Equal]", "0"}], 
          ",", 
          RowBox[{
           RowBox[{"D", "[", 
            RowBox[{"Profit2NEtmp", ",", "p2"}], "]"}], "\[Equal]", "0"}]}], 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"p1", ",", "p2"}], "}"}]}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"p1NE", "=", 
    RowBox[{"tmpp", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"p2NE", "=", 
    RowBox[{"tmpp", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pricesNE", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
       RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "and", " ", "then", " ", "the", " ", "associated", " ", "equilibrium", 
     " ", "payoffs"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"PROFIT1NE", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Profit1NEtmp", "/.", "pricesNE"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"PROFIT2NE", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Profit2NEtmp", "/.", "pricesNE"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"PROFITBNE", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"ProfitBNE", "/.", "pricesNE"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.6618428693385496`*^9, 3.661842873194935*^9}, {
   3.6618429315727725`*^9, 3.661843041068721*^9}, {3.661844127033015*^9, 
   3.661844162828015*^9}, {3.6620355512497773`*^9, 3.6620356159582567`*^9}, {
   3.6620356647067003`*^9, 3.662035712478486*^9}, {3.662035762677888*^9, 
   3.6620357676461945`*^9}, {3.665805233236223*^9, 3.665805246376008*^9}, {
   3.665806006001563*^9, 3.6658060213708353`*^9}, {3.6658948093681726`*^9, 
   3.665894820050297*^9}, {3.6658949067411375`*^9, 3.6658949104666224`*^9}, {
   3.6658949869829335`*^9, 3.665895022029005*^9}, {3.6658950645493727`*^9, 
   3.665895064681472*^9}, {3.6658951015707397`*^9, 3.6658951190784206`*^9}, 
   3.6670309380720987`*^9, {3.6945015163090024`*^9, 3.6945015700702024`*^9}, {
   3.694501669470002*^9, 3.6945016700316024`*^9}, {3.6945017048582025`*^9, 
   3.6945017099674025`*^9}, {3.7155754043700333`*^9, 3.7155754586366334`*^9}, 
   3.7319131664746604`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{
    RowBox[{"-", "c"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "-", 
      RowBox[{"2", " ", "\[Mu]"}], "+", 
      RowBox[{"\[Gamma]", " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Mu]", "+", 
         RowBox[{"\[Gamma]", " ", "\[Mu]"}], "-", 
         RowBox[{"d", " ", 
          RowBox[{"(", 
           RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "4"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "4"}], "+", 
         SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
     ")"}]}]}]]], "Output",
 CellChangeTimes->{3.7155754598378334`*^9, 3.726915829114995*^9, 
  3.7269841979201145`*^9, 3.727159696253439*^9, 3.7271718651693807`*^9, 
  3.727262565535077*^9, 3.7319058438536606`*^9, 3.73190588129366*^9, 
  3.73191316689966*^9, 3.732936330275488*^9, 3.734192118382269*^9, 
  3.734192153204562*^9, 3.73444070237926*^9, 3.740070661126635*^9, 
  3.740381285655518*^9, 3.7405683167470264`*^9, 3.740740917129883*^9, 
  3.74080114547016*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{
    RowBox[{"-", "d"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", "\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], "-", 
   RowBox[{"c", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "4"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "4"}], "+", 
         SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
     ")"}]}]}]]], "Output",
 CellChangeTimes->{3.7155754598378334`*^9, 3.726915829114995*^9, 
  3.7269841979201145`*^9, 3.727159696253439*^9, 3.7271718651693807`*^9, 
  3.727262565535077*^9, 3.7319058438536606`*^9, 3.73190588129366*^9, 
  3.73191316689966*^9, 3.732936330275488*^9, 3.734192118382269*^9, 
  3.734192153204562*^9, 3.73444070237926*^9, 3.740070661126635*^9, 
  3.740381285655518*^9, 3.7405683167470264`*^9, 3.740740917129883*^9, 
  3.740801145472166*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "2"}], " ", 
     RowBox[{"(", 
      RowBox[{"F1", "+", "F2"}], ")"}]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}],
            "2"]}], "+", 
         RowBox[{"2", " ", "c", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "2"}], "+", "d"}], ")"}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}],
            "2"]}], "-", 
         RowBox[{"2", " ", "d", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}],
            "2"]}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"c", "+", 
             RowBox[{"c", " ", 
              RowBox[{"(", 
               RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}],
            "2"]}], "+", 
         RowBox[{
          SuperscriptBox["d", "2"], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", 
            RowBox[{"\[Mu]", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{
                RowBox[{"-", "4"}], " ", 
                RowBox[{"(", 
                 RowBox[{"1", "+", "\[Mu]"}], ")"}]}], "+", 
               RowBox[{
                SuperscriptBox["\[Gamma]", "2"], " ", 
                RowBox[{"(", 
                 RowBox[{"2", "+", 
                  RowBox[{"3", " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}]}], 
           ")"}]}]}], ")"}]}], ")"}], "/", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "2"}], "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], 
         ")"}], "2"], " ", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}], 
        "2"]}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{3.7155754598378334`*^9, 3.726915829114995*^9, 
  3.7269841979201145`*^9, 3.727159696253439*^9, 3.7271718651693807`*^9, 
  3.727262565535077*^9, 3.7319058438536606`*^9, 3.73190588129366*^9, 
  3.73191316689966*^9, 3.732936330275488*^9, 3.734192118382269*^9, 
  3.734192153204562*^9, 3.73444070237926*^9, 3.740070661126635*^9, 
  3.740381285655518*^9, 3.7405683167470264`*^9, 3.740740917129883*^9, 
  3.7408011649265194`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"With", " ", "\[Mu]"}], "\[Rule]", 
    RowBox[{
    "0", " ", "marginal", " ", "prices", " ", "are", " ", "efficient"}]}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Limit", "[", 
    RowBox[{"p1NE", ",", 
     RowBox[{"\[Mu]", "\[Rule]", "0"}]}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"Limit", "[", 
    RowBox[{"p2NE", ",", 
     RowBox[{"\[Mu]", "\[Rule]", "0"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.665809103625598*^9, 3.6658091043330703`*^9}, 
   3.665809176334755*^9, {3.6658095976927814`*^9, 3.6658096325893197`*^9}, 
   3.667030938075099*^9, {3.6945016207594023`*^9, 3.694501626688402*^9}, {
   3.7155753079850335`*^9, 3.7155753079850335`*^9}, {3.7155755016598334`*^9, 
   3.715575522523033*^9}}],

Cell[BoxData["c"], "Output",
 CellChangeTimes->{3.6675355628893204`*^9, 3.6945016288160024`*^9, 
  3.694501746061202*^9, 3.694511680948374*^9, 3.694752100825987*^9, 
  3.6947759115622015`*^9, 3.695010375326626*^9, 3.6953572640137615`*^9, 
  3.6959603582110243`*^9, 3.6959772571871243`*^9, 3.697168790488615*^9, 
  3.697175824803461*^9, 3.6972579707617507`*^9, 3.708680116387779*^9, 
  3.7154372905497456`*^9, 3.7154379640202084`*^9, 3.7154381418908377`*^9, 
  3.7155755231696334`*^9, 3.727171868186327*^9, 3.727262579772522*^9, 
  3.7319058542636604`*^9, 3.7319058918066607`*^9, 3.732936340522488*^9, 
  3.734192120676374*^9, 3.734192167276207*^9, 3.734440716993105*^9, 
  3.74007067353459*^9, 3.740381299916443*^9, 3.740568331719199*^9, 
  3.74074093820529*^9, 3.7408011651531525`*^9}],

Cell[BoxData[
 RowBox[{"c", "+", "d"}]], "Output",
 CellChangeTimes->{3.6675355628893204`*^9, 3.6945016288160024`*^9, 
  3.694501746061202*^9, 3.694511680948374*^9, 3.694752100825987*^9, 
  3.6947759115622015`*^9, 3.695010375326626*^9, 3.6953572640137615`*^9, 
  3.6959603582110243`*^9, 3.6959772571871243`*^9, 3.697168790488615*^9, 
  3.697175824803461*^9, 3.6972579707617507`*^9, 3.708680116387779*^9, 
  3.7154372905497456`*^9, 3.7154379640202084`*^9, 3.7154381418908377`*^9, 
  3.7155755231696334`*^9, 3.727171868186327*^9, 3.727262579772522*^9, 
  3.7319058542636604`*^9, 3.7319058918066607`*^9, 3.732936340522488*^9, 
  3.734192120676374*^9, 3.734192167276207*^9, 3.734440716993105*^9, 
  3.74007067353459*^9, 3.740381299916443*^9, 3.740568331719199*^9, 
  3.74074093820529*^9, 3.7408011651762133`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"D", "[", 
      RowBox[{"Profit2NEtmp", ",", "p2"}], "]"}], "\[Equal]", "0"}], ",", 
    "p2"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.7341932768596735`*^9, 3.7341932850689526`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"p2", "\[Rule]", 
    FractionBox[
     RowBox[{"c", "+", "d", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "c", "+", "d", "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "p1"}], ")"}], " ", "\[Gamma]"}]}], 
        ")"}], " ", "\[Mu]"}]}], 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "\[Mu]"}]}]]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{3.7341932857539587`*^9, 3.73444071711446*^9, 
  3.74007067373011*^9, 3.740381300016709*^9, 3.740568331885641*^9, 
  3.740740938379454*^9, 3.7408011653381443`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Here", " ", "we", " ", "redefine", " ", "the", " ", "fixed", " ", "fees", 
    " ", "to", " ", "account", " ", "for", " ", "the", " ", "equilibrium", 
    " ", "prices"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"F1NE", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"F1dtmp", "/.", "pricesNE"}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{"F2NE", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"F2dtmp", "/.", "pricesNE"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.6620359713330956`*^9, 3.6620360310667315`*^9}, 
   3.6670309380760994`*^9, {3.6945016379168024`*^9, 3.694501660199602*^9}, {
   3.6945017500724025`*^9, 3.6945017543020024`*^9}, {3.7155755305796337`*^9, 
   3.7155755504580336`*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}], "-", 
       RowBox[{
        SuperscriptBox["\[Gamma]", "2"], " ", "\[Mu]"}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "d"}], ")"}], " ", "\[Gamma]", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}]}], "+", 
       RowBox[{"c", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], 
         ")"}]}]}], ")"}], "2"]}], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{"4", "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
         ")"}]}]}], ")"}], "2"]}]]}]], "Output",
 CellChangeTimes->{{3.7155755434516335`*^9, 3.7155755506296334`*^9}, 
   3.7269158384769945`*^9, 3.7269842064533143`*^9, 3.7271597051764393`*^9, 
   3.727171868471615*^9, 3.727262586622619*^9, 3.7319058544646606`*^9, 
   3.73190589200566*^9, 3.732936340731488*^9, 3.734192120714344*^9, 
   3.734192167603817*^9, 3.7344407173801346`*^9, 3.740070674045949*^9, 
   3.740381300267377*^9, 3.740568332212511*^9, 3.740740938812106*^9, 
   3.7408011657271786`*^9}],

Cell[BoxData[
 RowBox[{"-", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"-", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}], " ", 
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}],
         "+", 
        RowBox[{"c", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}],
         "+", 
        RowBox[{"d", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "2"}], "+", 
              SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
          ")"}]}]}], ")"}], "2"]}], ")"}], "/", 
   RowBox[{"(", 
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"\[Mu]", " ", 
         RowBox[{"(", 
          RowBox[{"4", "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "4"}], "+", 
              SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
          ")"}]}]}], ")"}], "2"]}], ")"}]}]}]], "Output",
 CellChangeTimes->{{3.7155755434516335`*^9, 3.7155755506296334`*^9}, 
   3.7269158384769945`*^9, 3.7269842064533143`*^9, 3.7271597051764393`*^9, 
   3.727171868471615*^9, 3.727262586622619*^9, 3.7319058544646606`*^9, 
   3.73190589200566*^9, 3.732936340731488*^9, 3.734192120714344*^9, 
   3.734192167603817*^9, 3.7344407173801346`*^9, 3.740070674045949*^9, 
   3.740381300267377*^9, 3.740568332212511*^9, 3.740740938812106*^9, 
   3.7408011661553173`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"With", " ", "\[Mu]"}], "\[Rule]", 
    RowBox[{
    "Infinity", " ", "fixed", " ", "fees", " ", "vanish", " ", "and", " ", 
     "we", " ", "are", " ", "left", " ", "with", " ", "linear", " ", 
     "pricing"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Limit", "[", 
    RowBox[{"F1NE", ",", 
     RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"Limit", "[", 
    RowBox[{"F2NE", ",", 
     RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.6658060900517416`*^9, 3.6658061190321875`*^9}, {
   3.666077753496785*^9, 3.666077756479083*^9}, {3.666077801675603*^9, 
   3.6660778046669016`*^9}, 3.6670309380780993`*^9, {3.6945017787114024`*^9, 
   3.6945017910962024`*^9}, {3.7155753080006332`*^9, 
   3.7155753080006332`*^9}, {3.7155755608244333`*^9, 3.7155755982880335`*^9}}],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{
  3.6675355797910104`*^9, {3.6945017661846027`*^9, 3.694501792063402*^9}, 
   3.694511681120257*^9, 3.694752101059987*^9, 3.6947759117743444`*^9, 
   3.6950103755606256`*^9, 3.6953572642477674`*^9, 3.6959603584450245`*^9, 
   3.6959772574641247`*^9, 3.697168790769413*^9, 3.69717582503746*^9, 
   3.69725797100795*^9, 3.708680117622286*^9, 3.715437291116936*^9, 
   3.7154379643796587`*^9, 3.7154381422627583`*^9, {3.7155755574080334`*^9, 
   3.7155755668012333`*^9}, 3.727171868689524*^9, 3.72726259245303*^9, 
   3.7319058549666605`*^9, 3.7319058924096603`*^9, 3.732936341242488*^9, 
   3.734192121076483*^9, 3.7341921684831*^9, 3.7344407182143493`*^9, 
   3.740070675387003*^9, 3.740381301070512*^9, 3.7405683334427843`*^9, 
   3.7407409393477054`*^9, 3.7408011664786787`*^9}],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{
  3.6675355797910104`*^9, {3.6945017661846027`*^9, 3.694501792063402*^9}, 
   3.694511681120257*^9, 3.694752101059987*^9, 3.6947759117743444`*^9, 
   3.6950103755606256`*^9, 3.6953572642477674`*^9, 3.6959603584450245`*^9, 
   3.6959772574641247`*^9, 3.697168790769413*^9, 3.69717582503746*^9, 
   3.69725797100795*^9, 3.708680117622286*^9, 3.715437291116936*^9, 
   3.7154379643796587`*^9, 3.7154381422627583`*^9, {3.7155755574080334`*^9, 
   3.7155755668012333`*^9}, 3.727171868689524*^9, 3.72726259245303*^9, 
   3.7319058549666605`*^9, 3.7319058924096603`*^9, 3.732936341242488*^9, 
   3.734192121076483*^9, 3.7341921684831*^9, 3.7344407182143493`*^9, 
   3.740070675387003*^9, 3.740381301070512*^9, 3.7405683334427843`*^9, 
   3.7407409393477054`*^9, 3.7408011665162783`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"Limit", "[", 
  RowBox[{"p1NE", ",", 
   RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Limit", "[", 
  RowBox[{"p2NE", ",", 
   RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.727163225580439*^9, 3.727163228414439*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "2"}], "+", "\[Gamma]", "-", 
   RowBox[{"d", " ", "\[Gamma]"}], "+", 
   SuperscriptBox["\[Gamma]", "2"], "-", 
   RowBox[{"c", " ", 
    RowBox[{"(", 
     RowBox[{"2", "+", "\[Gamma]"}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "4"}], "+", 
   SuperscriptBox["\[Gamma]", "2"]}]]], "Output",
 CellChangeTimes->{3.7271632289034395`*^9, 3.727171868824438*^9, 
  3.7272625937985973`*^9, 3.73190585502966*^9, 3.7319058924266605`*^9, 
  3.732936341307488*^9, 3.734192121109539*^9, 3.734192168577018*^9, 
  3.7344407183126125`*^9, 3.740070675678779*^9, 3.740381301152729*^9, 
  3.7405683335971947`*^9, 3.740740939510713*^9, 3.7408011666158395`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "2"}], "-", 
   RowBox[{"2", " ", "d"}], "+", "\[Gamma]", "+", 
   SuperscriptBox["\[Gamma]", "2"], "-", 
   RowBox[{"c", " ", 
    RowBox[{"(", 
     RowBox[{"2", "+", "\[Gamma]"}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "4"}], "+", 
   SuperscriptBox["\[Gamma]", "2"]}]]], "Output",
 CellChangeTimes->{3.7271632289034395`*^9, 3.727171868824438*^9, 
  3.7272625937985973`*^9, 3.73190585502966*^9, 3.7319058924266605`*^9, 
  3.732936341307488*^9, 3.734192121109539*^9, 3.734192168577018*^9, 
  3.7344407183126125`*^9, 3.740070675678779*^9, 3.740381301152729*^9, 
  3.7405683335971947`*^9, 3.740740939510713*^9, 3.740801166639904*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "We", " ", "show", " ", "that", " ", "these", " ", "fixed", " ", "fees", 
    " ", "are", " ", "always", " ", "positive", " ", "and", " ", "we", " ", 
    "do", " ", "not", " ", "need", " ", "to", " ", "take", " ", "care", " ", 
    "of", " ", "corner", " ", 
    RowBox[{"solutions", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Reduce", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"F1NE", "\[GreaterEqual]", "0"}], ",", 
      RowBox[{"1", "\[GreaterEqual]", "\[Mu]", "\[GreaterEqual]", "0"}], ",", 
      RowBox[{"1", "\[GreaterEqual]", "\[Gamma]", "\[GreaterEqual]", "0"}], 
      ",", 
      RowBox[{"1", "\[GreaterEqual]", "c", "\[GreaterEqual]", "0"}]}], "}"}], 
    "]"}], "\[IndentingNewLine]", 
   RowBox[{"Reduce", "[", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"F2NE", "\[GreaterEqual]", "0"}], ",", 
      RowBox[{"1", "\[GreaterEqual]", "\[Mu]", "\[GreaterEqual]", "0"}], ",", 
      RowBox[{"1", "\[GreaterEqual]", "\[Gamma]", "\[GreaterEqual]", "0"}], 
      ",", 
      RowBox[{"1", "\[GreaterEqual]", "c", "\[GreaterEqual]", "0"}]}], "}"}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.6620360371990385`*^9, 3.6620360706870823`*^9}, {
   3.662036107302877*^9, 3.6620361390255527`*^9}, {3.6620361726616163`*^9, 
   3.66203622565407*^9}, {3.6658053366057515`*^9, 3.6658053799586153`*^9}, {
   3.66580612692233*^9, 3.665806129036746*^9}, {3.6658062601134453`*^9, 
   3.6658063309982214`*^9}, {3.6658096680089483`*^9, 3.665809683529315*^9}, 
   3.6670309380801*^9, {3.7155752215582333`*^9, 3.7155752215582333`*^9}, {
   3.7155753080006332`*^9, 3.7155753080006332`*^9}, {3.7155756088512335`*^9, 
   3.7155756134084334`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"d", "\[Element]", "Reals"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "\[Mu]", "\[LessEqual]", "1"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "\[Gamma]", "<", "1"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "c", "\[LessEqual]", "1"}]}]], "Output",
 CellChangeTimes->{3.715575614157233*^9, 3.727171868946745*^9, 
  3.7319058550916605`*^9, 3.73190589247066*^9, 3.732936341372488*^9, 
  3.734192121147611*^9, 3.734192168676843*^9, 3.7344407184269156`*^9, 
  3.740070675847229*^9, 3.7403813012499886`*^9, 3.740568333864908*^9, 
  3.740740939669394*^9, 3.740801166765894*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"d", "\[Element]", "Reals"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "\[Mu]", "\[LessEqual]", "1"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "\[Gamma]", "<", "1"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "c", "\[LessEqual]", "1"}]}]], "Output",
 CellChangeTimes->{3.715575614157233*^9, 3.727171868946745*^9, 
  3.7319058550916605`*^9, 3.73190589247066*^9, 3.732936341372488*^9, 
  3.734192121147611*^9, 3.734192168676843*^9, 3.7344407184269156`*^9, 
  3.740070675847229*^9, 3.7403813012499886`*^9, 3.740568333864908*^9, 
  3.740740939669394*^9, 3.740801166796978*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
   "Note", " ", "that", " ", "since", " ", "we", " ", "are", " ", 
    "considering", " ", "parameters", " ", "\"\<below\>\"", " ", "the", " ", 
    "PPO", " ", "conditions"}], ",", " ", 
   RowBox[{
   "we", " ", "do", " ", "not", " ", "need", " ", "to", " ", "consider", " ", 
    "limit", " ", "pricing", " ", "and", " ", 
    RowBox[{"monopolypricing", "."}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7269158736561947`*^9, 3.7269159129081945`*^9}, {
  3.7329375948314877`*^9, 3.732937645535488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{
     "Now", " ", "we", " ", "consider", " ", "the", " ", "case", " ", "in", 
      " ", "which", " ", "the", " ", "capcity", " ", "constraint", " ", 
      "q2"}], "\[LessEqual]", 
     RowBox[{
      RowBox[{"K", " ", "is", " ", "binding", " ", "off"}], "-", 
      "equilibrium"}]}], ",", " ", 
    RowBox[{
     RowBox[{"i", ".", "e", ".", " ", "on"}], " ", "the", " ", "reservation", 
     " ", "payoff", " ", "of", " ", "exclusivity"}]}], " ", "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{"ve2", "-", 
       RowBox[{"p2", " ", "q2"}], "-", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}], "F2"}]}], "/.", 
      RowBox[{"q2", "\[Rule]", "k"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"ProfitBE2constr", "=", 
    RowBox[{"FullSimplify", "[", "%", "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7269843846833143`*^9, 3.7269844977053146`*^9}, 
   3.732937726347488*^9, {3.7341897575104375`*^9, 3.7341897603538103`*^9}, {
   3.7405686153635745`*^9, 3.7405686158689165`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"-", 
    FractionBox["1", "2"]}], " ", "k", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "2"}], "+", "k", "+", 
     RowBox[{"2", " ", "p2"}]}], ")"}]}], "-", 
  RowBox[{"F2", " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}]], "Output",
 CellChangeTimes->{3.7269844199081144`*^9, 3.727159741461439*^9, 
  3.727171869016941*^9, 3.7272626045067263`*^9, 3.7319058551476603`*^9, 
  3.7319058925256605`*^9, 3.732936341425488*^9, 3.732937730794488*^9, 
  3.7341921212298355`*^9, 3.7341921687651463`*^9, 3.7344407185161505`*^9, 
  3.7400706759946184`*^9, 3.7403813013171663`*^9, 3.740568334006318*^9, 
  3.740740939808715*^9, 3.7408011668839636`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "BR", " ", "of", " ", "firm", " ", "2", " ", "when", " ", "p1",
     " ", "is", " ", "such", " ", "that", " ", "firm", " ", "2", " ", "is", 
    " ", 
    RowBox[{"rationed", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"q2NE", "\[Equal]", "k"}], ",", "p2"}], "]"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.734193638740176*^9, 3.734193704980488*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"p2", "\[Rule]", 
    RowBox[{"1", "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "p1"}], ")"}], " ", "\[Gamma]"}], "+", 
     RowBox[{"k", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]}]}], "}"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.734193668377902*^9, 3.7344407185602703`*^9, 
  3.7400706760978966`*^9, 3.7403813013422337`*^9, 3.7405683341005335`*^9, 
  3.7407409399063935`*^9, 3.740801166964839*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "condition", " ", "for", " ", "the", " ", "binding", " ", 
    "constraint", " ", 
    RowBox[{"is", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"FullSimplify", "[", 
    RowBox[{"q2e", "/.", 
     RowBox[{"p2", "->", "p2NE"}]}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"%", "\[Equal]", "k"}], ",", "k"}], "]"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7271616320714393`*^9, 3.7271616646624393`*^9}, {
  3.732937735543488*^9, 3.732937743926488*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "c", "+", "d", "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"2", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "c"}], ")"}], " ", "\[Gamma]"}]}], ")"}], 
      " ", "\[Mu]"}]}], ")"}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "4"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "4"}], "+", 
         SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
     ")"}]}]}]]], "Output",
 CellChangeTimes->{{3.7271616492874393`*^9, 3.7271616648734393`*^9}, 
   3.7271718690826626`*^9, 3.7272626079915237`*^9, 3.7272629889956923`*^9, 
   3.7319058552076607`*^9, 3.7319058925876603`*^9, 3.732936341487488*^9, 
   3.732937747965488*^9, 3.7341921212679353`*^9, 3.7341921688774743`*^9, 
   3.7344407186555233`*^9, 3.740070676255312*^9, 3.7403813014244537`*^9, 
   3.740568334251937*^9, 3.7407409401169496`*^9, 3.7408011671111917`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"k", "\[Rule]", 
    FractionBox[
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "c", "+", "d", "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"2", " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "c"}], ")"}], " ", "\[Gamma]"}]}], 
          ")"}], " ", "\[Mu]"}]}], ")"}]}], 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"\[Mu]", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "4"}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "4"}], "+", 
            SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
        ")"}]}]}]]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{{3.7271616492874393`*^9, 3.7271616648734393`*^9}, 
   3.7271718690826626`*^9, 3.7272626079915237`*^9, 3.7272629889956923`*^9, 
   3.7319058552076607`*^9, 3.7319058925876603`*^9, 3.732936341487488*^9, 
   3.732937747965488*^9, 3.7341921212679353`*^9, 3.7341921688774743`*^9, 
   3.7344407186555233`*^9, 3.740070676255312*^9, 3.7403813014244537`*^9, 
   3.740568334251937*^9, 3.7407409401169496`*^9, 3.740801167113659*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"The", " ", "fixed", " ", "fees"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"tmpFconstr", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"ProfitBE1", "\[Equal]", "ProfitBNE"}], ",", 
          RowBox[{"ProfitBE2constr", "\[Equal]", "ProfitBNE"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"F1", ",", "F2"}], "}"}]}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"F1dtmpconstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"tmpFconstr", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], " ", "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"F2dtmpconstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"tmpFconstr", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2", ",", "2"}], "]"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7269845656901145`*^9, 3.7269845977793145`*^9}, {
   3.7271609865844393`*^9, 3.7271610619454393`*^9}, {3.732937757929488*^9, 
   3.7329377644094877`*^9}, 3.740384734515088*^9}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    RowBox[{
     RowBox[{"-", "k"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "2"}], "+", "k", "+", 
       RowBox[{"2", " ", "p2"}]}], ")"}]}], "+", 
    FractionBox[
     RowBox[{"2", "-", 
      RowBox[{"2", " ", "p1"}], "+", 
      SuperscriptBox["p1", "2"], "-", 
      RowBox[{"2", " ", "p2"}], "+", 
      SuperscriptBox["p2", "2"], "-", 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "p1"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "\[Gamma]"}]}], 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}]]}], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{{3.727161036739439*^9, 3.7271610630894394`*^9}, 
   3.727171869635606*^9, 3.7272630275832095`*^9, 3.73190585552466*^9, 
   3.7319058928636603`*^9, 3.732936341796488*^9, 3.732937765319488*^9, 
   3.73419212408002*^9, 3.734192169297364*^9, 3.7344407190716295`*^9, 
   3.7400706767576513`*^9, 3.7403813017914615`*^9, 3.7405683347523127`*^9, 
   3.740740940683441*^9, 3.740801167490492*^9}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p2", "+", "\[Gamma]", "-", 
      RowBox[{"p1", " ", "\[Gamma]"}]}], ")"}], "2"], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{{3.727161036739439*^9, 3.7271610630894394`*^9}, 
   3.727171869635606*^9, 3.7272630275832095`*^9, 3.73190585552466*^9, 
   3.7319058928636603`*^9, 3.732936341796488*^9, 3.732937765319488*^9, 
   3.73419212408002*^9, 3.734192169297364*^9, 3.7344407190716295`*^9, 
   3.7400706767576513`*^9, 3.7403813017914615`*^9, 3.7405683347523127`*^9, 
   3.740740940683441*^9, 3.7408011674924965`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Checking", " ", "that", " ", "the", " ", "equilibrium", " ", "marginal", 
     " ", "prices", " ", "are", " ", "unaffected", " ", "by", " ", "the", " ",
      "binding", " ", "capacity", " ", "off"}], "-", 
    RowBox[{
    "equilibrium", " ", "and", " ", "are", " ", "identical", " ", "to", " ", 
     "those", " ", "with", " ", "no", " ", "such", " ", "binding", " ", 
     RowBox[{"constraint", ":"}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Profit1NE", "/.", 
     RowBox[{"F1", "\[Rule]", "F1dtmpconstr"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Profit2NE", "/.", 
     RowBox[{"F2", "\[Rule]", "F2dtmpconstr"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%%", ",", "p1"}], "]"}], "\[Equal]", "0"}], ",", 
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%", ",", "p2"}], "]"}], "\[Equal]", "0"}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"p1", ",", "p2"}], "}"}]}], "]"}], "]"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", "p1NE", 
   "\[IndentingNewLine]", "p2NE", "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.7269846493217144`*^9, 3.7269846811613145`*^9}, {
  3.732937777296488*^9, 3.732937817544488*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"p1", "\[Rule]", 
     FractionBox[
      RowBox[{
       RowBox[{
        RowBox[{"-", "c"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], 
       "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "-", 
          RowBox[{"2", " ", "\[Mu]"}], "+", 
          RowBox[{"\[Gamma]", " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", "\[Mu]", "+", 
             RowBox[{"\[Gamma]", " ", "\[Mu]"}], "-", 
             RowBox[{"d", " ", 
              RowBox[{"(", 
               RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "4"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
         ")"}]}]}]]}], ",", 
    RowBox[{"p2", "\[Rule]", 
     FractionBox[
      RowBox[{
       RowBox[{
        RowBox[{"-", "d"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", "\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], 
       "-", 
       RowBox[{"c", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], 
         ")"}]}]}], 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "4"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
         ")"}]}]}]]}]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{3.7269846816917143`*^9, 3.7271597489454393`*^9, 
  3.7271718698236513`*^9, 3.7272631071792355`*^9, 3.7319058558216605`*^9, 
  3.73190589320866*^9, 3.732936342097488*^9, 3.732937818944488*^9, 
  3.734192124398579*^9, 3.7341921698057384`*^9, 3.734440719583991*^9, 
  3.740070677399356*^9, 3.7403813022506495`*^9, 3.740568335417082*^9, 
  3.7407409414401464`*^9, 3.740801168083816*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{
    RowBox[{"-", "c"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "-", 
      RowBox[{"2", " ", "\[Mu]"}], "+", 
      RowBox[{"\[Gamma]", " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Mu]", "+", 
         RowBox[{"\[Gamma]", " ", "\[Mu]"}], "-", 
         RowBox[{"d", " ", 
          RowBox[{"(", 
           RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "4"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "4"}], "+", 
         SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
     ")"}]}]}]]], "Output",
 CellChangeTimes->{3.7269846816917143`*^9, 3.7271597489454393`*^9, 
  3.7271718698236513`*^9, 3.7272631071792355`*^9, 3.7319058558216605`*^9, 
  3.73190589320866*^9, 3.732936342097488*^9, 3.732937818944488*^9, 
  3.734192124398579*^9, 3.7341921698057384`*^9, 3.734440719583991*^9, 
  3.740070677399356*^9, 3.7403813022506495`*^9, 3.740568335417082*^9, 
  3.7407409414401464`*^9, 3.740801168087323*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{
    RowBox[{"-", "d"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", "\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], "-", 
   RowBox[{"c", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", 
   RowBox[{"\[Mu]", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "4"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "4"}], "+", 
         SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
     ")"}]}]}]]], "Output",
 CellChangeTimes->{3.7269846816917143`*^9, 3.7271597489454393`*^9, 
  3.7271718698236513`*^9, 3.7272631071792355`*^9, 3.7319058558216605`*^9, 
  3.73190589320866*^9, 3.732936342097488*^9, 3.732937818944488*^9, 
  3.734192124398579*^9, 3.7341921698057384`*^9, 3.734440719583991*^9, 
  3.740070677399356*^9, 3.7403813022506495`*^9, 3.740568335417082*^9, 
  3.7407409414401464`*^9, 3.740801168089329*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Defining", " ", 
    RowBox[{"buyers", "'"}], " ", "profit"}], "*)"}], 
  RowBox[{"PROFITBNEconstr", "=", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"PROFITBNE", "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"F1", "->", "F1dtmpconstr"}], ",", 
        RowBox[{"F2", "->", "F2dtmpconstr"}]}], "}"}]}], "/.", "pricesNE"}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.73191326045866*^9, 3.7319132969306602`*^9}, {
  3.7319133376586604`*^9, 3.7319133732026606`*^9}, {3.732937850944488*^9, 
  3.732937877406488*^9}, {3.740568646181574*^9, 3.7405686567627287`*^9}}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "8"], " ", 
  RowBox[{"(", 
   RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"-", 
     FractionBox[
      RowBox[{"4", " ", 
       SuperscriptBox["k", "2"]}], 
      RowBox[{"1", "+", "\[Mu]"}]]}], "+", 
    FractionBox[
     RowBox[{"4", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "2"}], "+", 
        RowBox[{"2", " ", "c"}], "+", "d"}], ")"}], " ", "k"}], 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "2"}], "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}]], "-", 
    FractionBox[
     RowBox[{"4", " ", "d", " ", "k"}], 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}]], "+", 
    FractionBox[
     RowBox[{"4", " ", 
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", "d", "+", "\[Gamma]", "-", 
         RowBox[{"c", " ", "\[Gamma]"}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", 
            "\[Gamma]", "-", 
            RowBox[{"c", " ", "\[Gamma]"}], "-", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}], " ", 
             SuperscriptBox["\[Gamma]", "2"]}]}], ")"}], " ", "\[Mu]"}]}], 
        ")"}], "2"]}], 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"\[Mu]", " ", 
          RowBox[{"(", 
           RowBox[{"4", "-", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "4"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
           ")"}]}]}], ")"}], "2"]}]]}], ")"}]}]], "Output",
 CellChangeTimes->{3.732937909037488*^9, 3.734192126409728*^9, 
  3.7341922100861473`*^9, 3.734440761565385*^9, 3.740070721172922*^9, 
  3.740381342525756*^9, 3.7405683755948553`*^9, 3.7407409856548615`*^9, 
  3.740801211756551*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Mixed strategies", "Subsubsection",
 CellChangeTimes->{{3.732936296190488*^9, 3.732936301363488*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
   "When", " ", "the", " ", "capacity", " ", "constraint", " ", "binds", " ", 
    "in", " ", "equilibrium"}], ",", " ", 
   RowBox[{"we", " ", "need", " ", "to", " ", "consider", " ", "mixed", " ", 
    RowBox[{"strategies", "."}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.73190553781966*^9, 3.7319055607856607`*^9}, {
  3.7319056591466603`*^9, 3.7319056737386603`*^9}, {3.73191301360266*^9, 
  3.7319130138106604`*^9}, {3.732937907556488*^9, 3.732937934142488*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"First", ",", " ", 
   RowBox[{
   "we", " ", "identify", " ", "the", " ", "p2switch", " ", "that", " ", 
    "makes", " ", "firm", " ", "1", " ", "indifferent", " ", "as", " ", "for",
     " ", "the", " ", "mixed", " ", "strategy"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7319057345606604`*^9, 3.7319057436576605`*^9}, {
  3.732937938438488*^9, 3.732937969662488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "When", " ", "firm", " ", "1", " ", "makes", " ", "a", " ", "price", " ", 
     "such", " ", "that", " ", "firm", " ", "2", " ", "is", " ", "not", " ", 
     "rationed"}], ",", " ", 
    RowBox[{"its", " ", "profit", " ", 
     RowBox[{"is", ":"}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"p1", " ", "q1"}], "+", "F1dtmp", "-", 
     RowBox[{"c", " ", "q1"}]}], "/.", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
      RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"D", "[", 
         RowBox[{"%", ",", "p1"}], "]"}], "\[Equal]", "0"}], ",", "p1"}], 
      "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"P1Bertr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"p1", " ", "q1"}], "+", "F1dtmp", "-", 
        RowBox[{"c", " ", "q1"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
         RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
      RowBox[{"p1", "\[Rule]", "%"}]}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7294947399246244`*^9, 3.7294947481612663`*^9}, {
   3.72949478524236*^9, 3.7294948139900074`*^9}, {3.7319060295786605`*^9, 
   3.73190605771566*^9}, {3.7319067976196604`*^9, 3.7319068014676604`*^9}, 
   3.7319070100116606`*^9, {3.7329380687364883`*^9, 3.732938105439488*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", 
   FractionBox[
    RowBox[{"c", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
       RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}]}], 
    RowBox[{
     RowBox[{"-", "1"}], "+", 
     SuperscriptBox["\[Gamma]", "2"]}]]}], "+", 
  FractionBox[
   RowBox[{"p1", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
      RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}]}], 
   RowBox[{
    RowBox[{"-", "1"}], "+", 
    SuperscriptBox["\[Gamma]", "2"]}]], "-", 
  FractionBox[
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p1", "+", "\[Gamma]", "-", 
      RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}], "2"], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{
  3.729494749549639*^9, {3.729494793996792*^9, 3.729494801011057*^9}, 
   3.729494894591059*^9, 3.7318230432136602`*^9, 3.7319028048756604`*^9, 
   3.7319060593096604`*^9, 3.7319070119496603`*^9, 3.7319100918086605`*^9, 
   3.7329380990744877`*^9, 3.7341921265233746`*^9, 3.7341922101904593`*^9, 
   3.734440761677271*^9, 3.7400707215218472`*^9, 3.7403813426240177`*^9, 
   3.7405683757863655`*^9, 3.7407409857731504`*^9, 3.7408012119279604`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{"c", "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", "c", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "\[Gamma]"}]}], ")"}], 
    " ", "\[Mu]"}]}], 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{
  3.729494749549639*^9, {3.729494793996792*^9, 3.729494801011057*^9}, 
   3.729494894591059*^9, 3.7318230432136602`*^9, 3.7319028048756604`*^9, 
   3.7319060593096604`*^9, 3.7319070119496603`*^9, 3.7319100918086605`*^9, 
   3.7329380990744877`*^9, 3.7341921265233746`*^9, 3.7341922101904593`*^9, 
   3.734440761677271*^9, 3.7400707215218472`*^9, 3.7403813426240177`*^9, 
   3.7405683757863655`*^9, 3.7407409857731504`*^9, 3.740801211964057*^9}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", "\[Gamma]", "-", 
       RowBox[{"p2", " ", "\[Gamma]"}]}], ")"}], "2"], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}]]}]], "Output",
 CellChangeTimes->{
  3.729494749549639*^9, {3.729494793996792*^9, 3.729494801011057*^9}, 
   3.729494894591059*^9, 3.7318230432136602`*^9, 3.7319028048756604`*^9, 
   3.7319060593096604`*^9, 3.7319070119496603`*^9, 3.7319100918086605`*^9, 
   3.7329380990744877`*^9, 3.7341921265233746`*^9, 3.7341922101904593`*^9, 
   3.734440761677271*^9, 3.7400707215218472`*^9, 3.7403813426240177`*^9, 
   3.7405683757863655`*^9, 3.7407409857731504`*^9, 3.74080121202522*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"When", " ", "instead", " ", "firm", " ", "2", " ", "is", " ", 
   RowBox[{"rationed", ":", " ", 
    RowBox[{
    "we", " ", "need", " ", "to", " ", "first", " ", "determine", " ", "the", 
     " ", "fixed", " ", "fee"}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7319070298746605`*^9, 3.73190703882666*^9}, {
  3.732938120518488*^9, 3.7329381507984877`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"v", "/.", 
   RowBox[{"q2", "\[Rule]", "k"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"FullSimplify", "[", 
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"D", "[", 
      RowBox[{
       RowBox[{"%", "-", 
        RowBox[{"p1", " ", "q1"}], "-", 
        RowBox[{"p2", " ", "k"}]}], ",", "q1"}], "]"}], "\[Equal]", "0"}], 
    ",", "q1"}], "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"ProfitBNErationed", "=", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"v", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{"p2", " ", "k"}], "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Mu]"}], ")"}], 
       RowBox[{"(", 
        RowBox[{"F1", "+", "F2"}], ")"}]}]}], " ", "/.", 
     RowBox[{"q2", "\[Rule]", "k"}]}], "/.", 
    RowBox[{"q1", "\[Rule]", 
     RowBox[{"%", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{"F1rationed", "=", 
  RowBox[{
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"ProfitBE2constr", "\[Equal]", "ProfitBNErationed"}], ",", 
      "F1"}], "]"}], "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.7319071894746604`*^9, 3.7319073651796603`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"q1", "\[Rule]", 
    RowBox[{"1", "-", "p1", "-", 
     RowBox[{"k", " ", "\[Gamma]"}]}]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{
  3.7319072374746604`*^9, {3.7319073030196605`*^9, 3.7319073086046605`*^9}, {
   3.7319073455026608`*^9, 3.7319073657826605`*^9}, 3.7329381615674877`*^9, 
   3.734192126607132*^9, 3.7341922103022623`*^9, 3.734440761809369*^9, 
   3.7400707219339423`*^9, 3.7403813427363157`*^9, 3.7405683759668465`*^9, 
   3.7407409859554853`*^9, 3.740801212114457*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "p1"}], ")"}], "2"], "+", 
    RowBox[{"k", " ", 
     RowBox[{"(", 
      RowBox[{"2", "-", "k", "-", 
       RowBox[{"2", " ", "p2"}], "+", 
       RowBox[{"2", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "p1"}], ")"}], " ", "\[Gamma]"}], "+", 
       RowBox[{"k", " ", 
        SuperscriptBox["\[Gamma]", "2"]}]}], ")"}]}], "-", 
    RowBox[{"2", " ", "F1", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", "\[Mu]"}], ")"}]}], "-", 
    RowBox[{"2", " ", "F2", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{
  3.7319072374746604`*^9, {3.7319073030196605`*^9, 3.7319073086046605`*^9}, {
   3.7319073455026608`*^9, 3.7319073657826605`*^9}, 3.7329381615674877`*^9, 
   3.734192126607132*^9, 3.7341922103022623`*^9, 3.734440761809369*^9, 
   3.7400707219339423`*^9, 3.7403813427363157`*^9, 3.7405683759668465`*^9, 
   3.7407409859554853`*^9, 3.7408012122758856`*^9}],

Cell[BoxData[
 FractionBox[
  SuperscriptBox[
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "p1", "+", 
     RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"], 
  RowBox[{"2", " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]], "Output",
 CellChangeTimes->{
  3.7319072374746604`*^9, {3.7319073030196605`*^9, 3.7319073086046605`*^9}, {
   3.7319073455026608`*^9, 3.7319073657826605`*^9}, 3.7329381615674877`*^9, 
   3.734192126607132*^9, 3.7341922103022623`*^9, 3.734440761809369*^9, 
   3.7400707219339423`*^9, 3.7403813427363157`*^9, 3.7405683759668465`*^9, 
   3.7407409859554853`*^9, 3.7408012123370504`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "then", " ", "the", " ", "quantity", " ", "of", " ", "firm", " ", "1"}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"v", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{"q2", " ", "p2"}]}], "/.", 
     RowBox[{"q2", "\[Rule]", "k"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"q1rationed", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%", ",", "q1"}], "]"}], "\[Equal]", "0"}], ",", "q1"}], 
       "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.729494548150511*^9, 3.7294946004963045`*^9}, {
  3.732938166495488*^9, 3.732938173512488*^9}}],

Cell[BoxData[
 RowBox[{"1", "-", "p1", "-", 
  RowBox[{"k", " ", "\[Gamma]"}]}]], "Output",
 CellChangeTimes->{{3.729494582595049*^9, 3.7294946016350827`*^9}, 
   3.7318230320796604`*^9, 3.7319027361886606`*^9, 3.7319060032696605`*^9, 
   3.7319100616456604`*^9, 3.732938174240488*^9, 3.7341921274316654`*^9, 
   3.734192210527939*^9, 3.734440762041109*^9, 3.7400707227511826`*^9, 
   3.7403813429599104`*^9, 3.7405683762806826`*^9, 3.7407409862817464`*^9, 
   3.740801212415301*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Then", " ", "the", " ", "profit", " ", "of", " ", "firm", " ", "1"}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"(", 
       RowBox[{"p1", "-", "c"}], ")"}], "q1"}], "+", "F1rationed"}], "/.", 
    RowBox[{"{", 
     RowBox[{"q1", "->", "q1rationed"}], "}"}]}], "\[IndentingNewLine]", 
   RowBox[{"BR1rationed", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%", ",", "p1"}], "]"}], "\[Equal]", "0"}], ",", "p1"}], 
       "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"Limit", "[", 
    RowBox[{"%", ",", 
     RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"P1rationed", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{"p1", "-", "c"}], ")"}], "q1"}], "+", "F1rationed"}], "/.", 
       RowBox[{"{", 
        RowBox[{"q1", "->", "q1rationed"}], "}"}]}], "/.", 
      RowBox[{"p1", "->", "BR1rationed"}]}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7319074935706606`*^9, 3.7319075225156603`*^9}, {
  3.732938177072488*^9, 3.732938203921488*^9}, {3.7405700623499928`*^9, 
  3.740570068509426*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "c"}], "+", "p1"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{"1", "-", "p1", "-", 
     RowBox[{"k", " ", "\[Gamma]"}]}], ")"}]}], "+", 
  FractionBox[
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "p1", "+", 
      RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"], 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]}]], "Output",
 CellChangeTimes->{{3.73190749670866*^9, 3.7319075233206606`*^9}, 
   3.73191022447766*^9, {3.7329381902174883`*^9, 3.732938204412488*^9}, 
   3.7341921275744386`*^9, 3.7341922105585203`*^9, 3.7341927205621767`*^9, 
   3.7344407620817757`*^9, 3.7400707229105387`*^9, 3.740381342992998*^9, 
   3.7405683763709226`*^9, 3.740740986355685*^9, 3.7408012124994802`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{"c", "+", "\[Mu]", "+", 
   RowBox[{"c", " ", "\[Mu]"}], "-", 
   RowBox[{"k", " ", "\[Gamma]", " ", "\[Mu]"}]}], 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{{3.73190749670866*^9, 3.7319075233206606`*^9}, 
   3.73191022447766*^9, {3.7329381902174883`*^9, 3.732938204412488*^9}, 
   3.7341921275744386`*^9, 3.7341922105585203`*^9, 3.7341927205621767`*^9, 
   3.7344407620817757`*^9, 3.7400707229105387`*^9, 3.740381342992998*^9, 
   3.7405683763709226`*^9, 3.740740986355685*^9, 3.740801212508505*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "2"], " ", 
  RowBox[{"(", 
   RowBox[{"1", "+", "c", "-", 
    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}]}]], "Output",
 CellChangeTimes->{{3.73190749670866*^9, 3.7319075233206606`*^9}, 
   3.73191022447766*^9, {3.7329381902174883`*^9, 3.732938204412488*^9}, 
   3.7341921275744386`*^9, 3.7341922105585203`*^9, 3.7341927205621767`*^9, 
   3.7344407620817757`*^9, 3.7400707229105387`*^9, 3.740381342992998*^9, 
   3.7405683763709226`*^9, 3.740740986355685*^9, 3.740801212571674*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "c", "+", 
      RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"], " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}]}], 
  RowBox[{"2", "+", 
   RowBox[{"4", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{{3.73190749670866*^9, 3.7319075233206606`*^9}, 
   3.73191022447766*^9, {3.7329381902174883`*^9, 3.732938204412488*^9}, 
   3.7341921275744386`*^9, 3.7341922105585203`*^9, 3.7341927205621767`*^9, 
   3.7344407620817757`*^9, 3.7400707229105387`*^9, 3.740381342992998*^9, 
   3.7405683763709226`*^9, 3.740740986355685*^9, 3.74080121257368*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "The", " ", "p2switch", " ", "makes", " ", "firm", " ", "1", " ", 
     "indifferent", " ", "between", " ", "the", " ", "two", " ", "cases", " ",
      "above", " ", 
     RowBox[{"(", 
      RowBox[{
      "note", " ", "that", " ", "indifference", " ", "for", " ", "firm", " ", 
       "1", " ", "clearly", " ", "refers", " ", "to", " ", "the", " ", 
       "total", " ", "profit", " ", "obtained", " ", "with", " ", "the", " ", 
       "two", " ", "different", " ", "pairs", " ", "of", " ", "marginal", " ",
        "price", " ", "and", " ", "fixed", " ", "fee", " ", "that", " ", 
       "respectively", " ", "make", " ", "the", " ", "constraint", " ", "of", 
       " ", "firm", " ", "2", " ", "binding", " ", "or", " ", "not"}], 
      ")"}]}], ":"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"P1Bertr", "==", "P1rationed"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{"%", ",", "p2"}], "]"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"%", "/.", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"c", "\[Rule]", "0"}], ",", 
      RowBox[{"d", "\[Rule]", "0.2"}], ",", 
      RowBox[{"\[Gamma]", "\[Rule]", "0.5"}], ",", 
      RowBox[{"k", "\[Rule]", "0.2"}]}], "}"}]}], "\[IndentingNewLine]", 
   RowBox[{"p2switch", "=", 
    RowBox[{"%%", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7294948599765244`*^9, 3.7294949508997765`*^9}, 
   3.7319075699786606`*^9, {3.7319076818906603`*^9, 3.7319076872266607`*^9}, {
   3.7329382131994877`*^9, 3.7329382384164877`*^9}, {3.732939157432488*^9, 
   3.732939202110488*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p2", "\[Rule]", 
     FractionBox[
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", "\[Gamma]", "-", 
       SqrtBox[
        RowBox[{
         RowBox[{"-", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", 
             RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "\[Gamma]"]}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p2", "\[Rule]", 
     FractionBox[
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", "\[Gamma]", "+", 
       SqrtBox[
        RowBox[{
         RowBox[{"-", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", 
             RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "\[Gamma]"]}], 
    "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.729494892095107*^9, 3.7294949514301662`*^9}, 
   3.7318230516996603`*^9, 3.7319028088766603`*^9, {3.73190755688066*^9, 
   3.7319075703976603`*^9}, 3.7319102407406607`*^9, {3.732938235478488*^9, 
   3.732938238978488*^9}, 3.734192128192154*^9, 3.7341922109140186`*^9, 
   3.7344407624277983`*^9, 3.740070724039735*^9, 3.740381343365034*^9, 
   3.740568376839202*^9, 3.740740986827818*^9, 3.740801212993841*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p2", "\[Rule]", 
     RowBox[{"-", "2.5588457268119895`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p2", "\[Rule]", "0.5588457268119895`"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.729494892095107*^9, 3.7294949514301662`*^9}, 
   3.7318230516996603`*^9, 3.7319028088766603`*^9, {3.73190755688066*^9, 
   3.7319075703976603`*^9}, 3.7319102407406607`*^9, {3.732938235478488*^9, 
   3.732938238978488*^9}, 3.734192128192154*^9, 3.7341922109140186`*^9, 
   3.7344407624277983`*^9, 3.740070724039735*^9, 3.740381343365034*^9, 
   3.740568376839202*^9, 3.740740986827818*^9, 3.7408012130419235`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "1"}], "+", "c", "+", "\[Gamma]", "+", 
   SqrtBox[
    RowBox[{
     RowBox[{"-", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", 
         RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "\[Gamma]"]], "Output",
 CellChangeTimes->{{3.729494892095107*^9, 3.7294949514301662`*^9}, 
   3.7318230516996603`*^9, 3.7319028088766603`*^9, {3.73190755688066*^9, 
   3.7319075703976603`*^9}, 3.7319102407406607`*^9, {3.732938235478488*^9, 
   3.732938238978488*^9}, 3.734192128192154*^9, 3.7341922109140186`*^9, 
   3.7344407624277983`*^9, 3.740070724039735*^9, 3.740381343365034*^9, 
   3.740568376839202*^9, 3.740740986827818*^9, 3.740801213042926*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Here", " ", "we", " ", "determine", " ", "the", " ", "equilibrium", " ", 
    "marginal", " ", "price", " ", "that", " ", "makes", " ", "firm", " ", 
    "2", " ", "not", " ", 
    RowBox[{"rationed", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"p1", " ", "q1"}], "+", "F1dtmp", "-", 
      RowBox[{"c", " ", "q1"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"D", "[", 
         RowBox[{"%", ",", "p1"}], "]"}], "\[Equal]", "0"}], ",", "p1"}], 
      "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "\[IndentingNewLine]", 
   RowBox[{"p1NoRat", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"%", "/.", 
      RowBox[{"p2", "\[Rule]", "p2switch"}]}], "]"}]}], "\[IndentingNewLine]", 
   RowBox[{"P1Norationed", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"p1", "-", "c"}], ")"}], "q1"}], "+", "F1dtmp"}], "/.", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
          RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
       RowBox[{"p2", "\[Rule]", "p2switch"}]}], "/.", 
      RowBox[{"p1", "->", "p1NoRat"}]}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7294970821862154`*^9, 3.7294970856493487`*^9}, {
   3.7294971193849*^9, 3.729497137173558*^9}, {3.7318239693576603`*^9, 
   3.7318239737736607`*^9}, {3.7318242458216605`*^9, 3.7318242551656604`*^9}, 
   3.73182449503666*^9, 3.7319077029546604`*^9, {3.7319077384106607`*^9, 
   3.7319077640526605`*^9}, {3.732938424208488*^9, 3.732938452385488*^9}, {
   3.740570000261789*^9, 3.7405700494677615`*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{"c", "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", "c", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "\[Gamma]"}]}], ")"}], 
    " ", "\[Mu]"}]}], 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{
  3.7294970861329393`*^9, 3.7294971393907156`*^9, 3.73182329939966*^9, 
   3.73182397443766*^9, 3.7318242563216605`*^9, 3.7318244956446605`*^9, 
   3.7319032170606604`*^9, {3.7319077506556606`*^9, 3.7319077646056604`*^9}, 
   3.732938458288488*^9, 3.734192128224238*^9, 3.734192210950116*^9, 
   3.734440762467104*^9, 3.740070724521003*^9, 3.7403813434020863`*^9, 
   3.740568377030679*^9, {3.740570030967486*^9, 3.740570050268852*^9}, 
   3.7407409870088053`*^9, 3.7408012132113733`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{"c", "+", 
   RowBox[{"2", " ", "c", " ", "\[Mu]"}], "+", 
   RowBox[{
    SqrtBox[
     RowBox[{
      RowBox[{"-", 
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "c", "+", 
          RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}]}], 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{
  3.7294970861329393`*^9, 3.7294971393907156`*^9, 3.73182329939966*^9, 
   3.73182397443766*^9, 3.7318242563216605`*^9, 3.7318244956446605`*^9, 
   3.7319032170606604`*^9, {3.7319077506556606`*^9, 3.7319077646056604`*^9}, 
   3.732938458288488*^9, 3.734192128224238*^9, 3.734192210950116*^9, 
   3.734440762467104*^9, 3.740070724521003*^9, 3.7403813434020863`*^9, 
   3.740568377030679*^9, {3.740570030967486*^9, 3.740570050268852*^9}, 
   3.7407409870088053`*^9, 3.7408012133216686`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "c", "+", 
      RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"], " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}]}], 
  RowBox[{"2", "+", 
   RowBox[{"4", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{
  3.7294970861329393`*^9, 3.7294971393907156`*^9, 3.73182329939966*^9, 
   3.73182397443766*^9, 3.7318242563216605`*^9, 3.7318244956446605`*^9, 
   3.7319032170606604`*^9, {3.7319077506556606`*^9, 3.7319077646056604`*^9}, 
   3.732938458288488*^9, 3.734192128224238*^9, 3.734192210950116*^9, 
   3.734440762467104*^9, 3.740070724521003*^9, 3.7403813434020863`*^9, 
   3.740568377030679*^9, {3.740570030967486*^9, 3.740570050268852*^9}, 
   3.7407409870088053`*^9, 3.740801213393896*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
   "Now", " ", "we", " ", "need", " ", "to", " ", "determine", " ", "the", 
    " ", "fixed", " ", "fee", " ", "of", " ", "firm", " ", "2", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
      "and", " ", "then", " ", "we", " ", "will", " ", "eventually", " ", 
       "determine", " ", "the", " ", "mixing", " ", "probability"}], ")"}], 
     ".", " ", "Note"}], " ", "that", " ", "firm", " ", "2", " ", "will", " ",
     "offer", " ", "one", " ", "pair", " ", 
    RowBox[{"(", 
     RowBox[{"p2", ",", "F2"}], ")"}]}], ",", " ", 
   RowBox[{
    RowBox[{
    "that", " ", "must", " ", "make", " ", "the", " ", "buyer", " ", 
     "indifferent", " ", "with", " ", "exclusivity", " ", "and", " ", "firm", 
     " ", "1", " ", "from", " ", "an", " ", "ex"}], "-", 
    RowBox[{"ante", " ", "view", " ", "point", " ", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"i", ".", "e", ".", " ", "before"}], " ", "the", " ", 
        "realization", " ", "of", " ", "the", " ", "mixed", " ", "strategy", 
        " ", "of", " ", "firm", " ", "1"}], ")"}], "."}]}]}]}], 
  "*)"}]], "Input",
 CellChangeTimes->{{3.732938511215488*^9, 3.732938546766488*^9}, {
  3.732939230319488*^9, 3.732939310167488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "As", " ", "for", " ", "F2", " ", "the", " ", "buyer", " ", "must", " ", 
     "be", " ", "indifferent", " ", "between", " ", 
     RowBox[{"(", "expected", ")"}], " ", "payoff", " ", "with", " ", 
     "common", " ", "representation", " ", "and", " ", "expected", " ", 
     "payoff", " ", "with", " ", "exclusivity", " ", "with", " ", "firm", " ",
      "1"}], ":"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"v", "-", 
       RowBox[{"p1", " ", "q1"}], "-", 
       RowBox[{"p2", " ", "q2"}]}], "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"q1", "->", "q1rationed"}], ",", 
        RowBox[{"q2", "\[Rule]", "k"}]}], "}"}]}], "/.", 
     RowBox[{"p1", "->", "BR1rationed"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"v", "-", 
       RowBox[{"p1", " ", "q1"}], "-", 
       RowBox[{"p2", " ", "q2"}]}], "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
        RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
     RowBox[{"p1", "\[Rule]", "p1NoRat"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"PBCRmixvariable", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", "x"}], ")"}], 
       RowBox[{"(", "%", ")"}]}], "+", 
      RowBox[{"x", " ", "%%"}]}], "]"}]}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"ve1", "-", 
       RowBox[{"p1", " ", "q1"}]}], "/.", 
      RowBox[{"{", 
       RowBox[{"q1", "\[Rule]", "q1e"}], "}"}]}], "/.", 
     RowBox[{"p1", "->", "BR1rationed"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"ve1", "-", 
       RowBox[{"p1", " ", "q1"}]}], "/.", 
      RowBox[{"{", 
       RowBox[{"q1", "\[Rule]", "q1e"}], "}"}]}], "/.", 
     RowBox[{"p1", "\[Rule]", "p1NoRat"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"PBE1mixvariable", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", "x"}], ")"}], 
       RowBox[{"(", "%", ")"}]}], "+", 
      RowBox[{"x", " ", "%%"}]}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7319079440346603`*^9, 3.7319079556116605`*^9}, {
  3.73190821597066*^9, 3.7319083168586607`*^9}, {3.7319083570826607`*^9, 
  3.7319084026906605`*^9}, {3.73190848790666*^9, 3.7319085246666603`*^9}, {
  3.7319085578356605`*^9, 3.7319086152826605`*^9}, {3.732938616767488*^9, 
  3.732938688285488*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "x"}], ")"}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"p2", "+", 
        RowBox[{"2", " ", "p2", " ", "\[Mu]"}]}], ")"}], "2"]}], "-", 
    RowBox[{"2", " ", "p2", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "\[Gamma]", "-", 
       RowBox[{"2", " ", "\[Mu]"}], "+", 
       RowBox[{"2", " ", "\[Gamma]", " ", "\[Mu]"}], "-", 
       RowBox[{"\[Gamma]", " ", 
        SqrtBox[
         RowBox[{
          RowBox[{"-", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "c", "+", 
              RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", 
            SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}], "+", 
       RowBox[{"x", " ", "\[Gamma]", " ", 
        SqrtBox[
         RowBox[{
          RowBox[{"-", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "c", "+", 
              RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", 
            SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}], "+", 
       RowBox[{"x", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "k", "+", 
          RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}], "+", 
    RowBox[{
     SuperscriptBox["c", "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"x", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          SuperscriptBox["\[Gamma]", "2"], "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "4"}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "5"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
         ")"}]}]}], ")"}]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"2", "+", 
       RowBox[{"x", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "k", "+", 
              RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], "+", 
          RowBox[{"2", " ", 
           SqrtBox[
            RowBox[{
             RowBox[{"-", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "c", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}], 
          "-", 
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{"2", "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "2"}], "+", "k"}], ")"}], " ", "k", " ", 
              RowBox[{"(", 
               RowBox[{"1", "+", "\[Gamma]"}], ")"}]}]}], ")"}], " ", 
           "\[Mu]"}]}], ")"}]}], "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{"8", "-", 
          RowBox[{"2", " ", 
           SqrtBox[
            RowBox[{
             RowBox[{"-", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "c", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"9", "-", 
             RowBox[{"4", " ", 
              SqrtBox[
               RowBox[{
                RowBox[{"-", 
                 SuperscriptBox[
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", 
                  SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "+", 
             RowBox[{"\[Gamma]", " ", 
              RowBox[{"(", 
               RowBox[{"1", "+", 
                RowBox[{"k", " ", 
                 RowBox[{"(", 
                  RowBox[{"1", "+", "\[Gamma]"}], ")"}], " ", 
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "2"}], "+", 
                   RowBox[{"k", " ", "\[Gamma]"}]}], ")"}]}]}], ")"}]}]}], 
            ")"}], " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}], "+", 
    RowBox[{"2", " ", "c", " ", 
     RowBox[{"(", 
      RowBox[{"1", "-", 
       RowBox[{
        SuperscriptBox["\[Gamma]", "2"], " ", 
        RowBox[{"(", 
         RowBox[{"x", "+", 
          RowBox[{"2", " ", "x", " ", "\[Mu]"}], "+", 
          SuperscriptBox["\[Mu]", "2"]}], ")"}]}], "+", 
       RowBox[{"k", " ", 
        SuperscriptBox["\[Gamma]", "3"], " ", 
        RowBox[{"(", 
         RowBox[{"x", "+", 
          RowBox[{"2", " ", "x", " ", "\[Mu]"}], "+", 
          SuperscriptBox["\[Mu]", "2"]}], ")"}]}], "+", 
       RowBox[{"\[Mu]", " ", 
        RowBox[{"(", 
         RowBox[{"4", "-", 
          SqrtBox[
           RowBox[{
            RowBox[{"-", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", 
                RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", 
              SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"5", "-", 
             RowBox[{"2", " ", 
              SqrtBox[
               RowBox[{
                RowBox[{"-", 
                 SuperscriptBox[
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", 
                  SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}]}], ")"}], " ",
            "\[Mu]"}], "+", 
          RowBox[{"x", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "2"}], "+", 
             SqrtBox[
              RowBox[{
               RowBox[{"-", 
                SuperscriptBox[
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "c", "+", 
                   RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", 
                 SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}], "+", 
       RowBox[{"\[Gamma]", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "-", 
          RowBox[{"x", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "k", "-", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "-", 
          RowBox[{"p2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "x"}], ")"}], " ", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"1", "+", 
              RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}], "-", 
          RowBox[{"\[Mu]", " ", 
           RowBox[{"(", 
            RowBox[{"4", "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"4", "+", "k"}], ")"}], " ", "\[Mu]"}]}], ")"}]}]}], 
         ")"}]}]}], ")"}]}]}], ")"}], "/", 
  RowBox[{"(", 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}], ")"}]}]], "Output",
 CellChangeTimes->{{3.7319079262496605`*^9, 3.7319079562496605`*^9}, 
   3.73190839281266*^9, 3.7319084436046605`*^9, 3.7319086196746607`*^9, 
   3.732938728954488*^9, 3.7341921364017487`*^9, 3.7341922599870214`*^9, 
   3.7344408141275277`*^9, 3.7400707799049196`*^9, 3.740381394448842*^9, 
   3.740568425873639*^9, 3.7407410415236206`*^9, 3.740801264818869*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", 
   RowBox[{"2", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}]], 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "x"}], ")"}]}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "c", "+", 
        RowBox[{"2", " ", "c", " ", "\[Mu]"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "2"}], "+", 
           SqrtBox[
            RowBox[{
             RowBox[{"-", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "c", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
         "\[Mu]"}]}], ")"}], "2"]}], "+", 
    RowBox[{"x", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]", "+", 
        RowBox[{"k", " ", "\[Gamma]", " ", "\[Mu]"}], "-", 
        RowBox[{"c", " ", 
         RowBox[{"(", 
          RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}], "2"]}]}], 
   ")"}]}]], "Output",
 CellChangeTimes->{{3.7319079262496605`*^9, 3.7319079562496605`*^9}, 
   3.73190839281266*^9, 3.7319084436046605`*^9, 3.7319086196746607`*^9, 
   3.732938728954488*^9, 3.7341921364017487`*^9, 3.7341922599870214`*^9, 
   3.7344408141275277`*^9, 3.7400707799049196`*^9, 3.740381394448842*^9, 
   3.740568425873639*^9, 3.7407410415236206`*^9, 3.740801272218712*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"F2mix", "=", 
  RowBox[{"Simplify", "[", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"PBCRmixvariable", "-", "PBE1mixvariable"}], ")"}], "/", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.7319086319386606`*^9, 3.7319086423386602`*^9}, 
   3.7319087197146606`*^9, {3.7319104420746603`*^9, 3.73191044801066*^9}, {
   3.732938701300488*^9, 3.732938707172488*^9}}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", 
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}]], 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "x"}], ")"}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "c", "+", 
        RowBox[{"2", " ", "c", " ", "\[Mu]"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "2"}], "+", 
           SqrtBox[
            RowBox[{
             RowBox[{"-", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "c", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
         "\[Mu]"}]}], ")"}], "2"]}], "-", 
    RowBox[{"x", " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]", "+", 
        RowBox[{"k", " ", "\[Gamma]", " ", "\[Mu]"}], "-", 
        RowBox[{"c", " ", 
         RowBox[{"(", 
          RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}], "2"]}], "+", 
    RowBox[{
     RowBox[{"1", "/", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        SuperscriptBox["\[Gamma]", "2"]}], ")"}]}], 
     RowBox[{"(", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "x"}], ")"}], " ", 
        SuperscriptBox[
         RowBox[{"(", 
          RowBox[{"p2", "+", 
           RowBox[{"2", " ", "p2", " ", "\[Mu]"}]}], ")"}], "2"]}], "-", 
       RowBox[{"2", " ", "p2", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Gamma]", "-", 
          RowBox[{"2", " ", "\[Mu]"}], "+", 
          RowBox[{"2", " ", "\[Gamma]", " ", "\[Mu]"}], "-", 
          RowBox[{"\[Gamma]", " ", 
           SqrtBox[
            RowBox[{
             RowBox[{"-", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "c", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}], 
          "+", 
          RowBox[{"x", " ", "\[Gamma]", " ", 
           SqrtBox[
            RowBox[{
             RowBox[{"-", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "c", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", 
               SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}], 
          "+", 
          RowBox[{"x", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "k", "+", 
             RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}], "+", 
       RowBox[{
        SuperscriptBox["c", "2"], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          RowBox[{"x", " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             SuperscriptBox["\[Gamma]", "2"], "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "+", 
          RowBox[{"\[Mu]", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "4"}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "5"}], "+", 
                SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ", "\[Mu]"}]}], 
            ")"}]}]}], ")"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          RowBox[{"x", " ", 
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "k", "+", 
                 RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], "+", 
             RowBox[{"2", " ", 
              SqrtBox[
               RowBox[{
                RowBox[{"-", 
                 SuperscriptBox[
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", 
                  SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], " ", "\[Mu]"}],
              "-", 
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{"2", "+", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "2"}], "+", "k"}], ")"}], " ", "k", " ", 
                 RowBox[{"(", 
                  RowBox[{"1", "+", "\[Gamma]"}], ")"}]}]}], ")"}], " ", 
              "\[Mu]"}]}], ")"}]}], "+", 
          RowBox[{"\[Mu]", " ", 
           RowBox[{"(", 
            RowBox[{"8", "-", 
             RowBox[{"2", " ", 
              SqrtBox[
               RowBox[{
                RowBox[{"-", 
                 SuperscriptBox[
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", 
                  SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"9", "-", 
                RowBox[{"4", " ", 
                 SqrtBox[
                  RowBox[{
                   RowBox[{"-", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                   RowBox[{"(", 
                    RowBox[{
                    RowBox[{"-", "1"}], "+", 
                    SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], "+", 
                RowBox[{"\[Gamma]", " ", 
                 RowBox[{"(", 
                  RowBox[{"1", "+", 
                   RowBox[{"k", " ", 
                    RowBox[{"(", 
                    RowBox[{"1", "+", "\[Gamma]"}], ")"}], " ", 
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"-", "2"}], "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}]}]}], ")"}]}]}], 
               ")"}], " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}], "+", 
       RowBox[{"2", " ", "c", " ", 
        RowBox[{"(", 
         RowBox[{"1", "-", 
          RowBox[{
           SuperscriptBox["\[Gamma]", "2"], " ", 
           RowBox[{"(", 
            RowBox[{"x", "+", 
             RowBox[{"2", " ", "x", " ", "\[Mu]"}], "+", 
             SuperscriptBox["\[Mu]", "2"]}], ")"}]}], "+", 
          RowBox[{"k", " ", 
           SuperscriptBox["\[Gamma]", "3"], " ", 
           RowBox[{"(", 
            RowBox[{"x", "+", 
             RowBox[{"2", " ", "x", " ", "\[Mu]"}], "+", 
             SuperscriptBox["\[Mu]", "2"]}], ")"}]}], "+", 
          RowBox[{"\[Mu]", " ", 
           RowBox[{"(", 
            RowBox[{"4", "-", 
             SqrtBox[
              RowBox[{
               RowBox[{"-", 
                SuperscriptBox[
                 RowBox[{"(", 
                  RowBox[{
                   RowBox[{"-", "1"}], "+", "c", "+", 
                   RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", 
                 SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]], "+", 
             RowBox[{
              RowBox[{"(", 
               RowBox[{"5", "-", 
                RowBox[{"2", " ", 
                 SqrtBox[
                  RowBox[{
                   RowBox[{"-", 
                    SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                   RowBox[{"(", 
                    RowBox[{
                    RowBox[{"-", "1"}], "+", 
                    SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}]}], ")"}], 
              " ", "\[Mu]"}], "+", 
             RowBox[{"x", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "2"}], "+", 
                SqrtBox[
                 RowBox[{
                  RowBox[{"-", 
                   SuperscriptBox[
                    RowBox[{"(", 
                    RowBox[{
                    RowBox[{"-", "1"}], "+", "c", "+", 
                    RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
                  RowBox[{"(", 
                   RowBox[{
                    RowBox[{"-", "1"}], "+", 
                    SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
              RowBox[{"(", 
               RowBox[{"1", "+", 
                RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}]}], ")"}]}], "+", 
          RowBox[{"\[Gamma]", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "-", 
             RowBox[{"x", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "k", "-", 
                RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
              RowBox[{"(", 
               RowBox[{"1", "+", 
                RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "-", 
             RowBox[{"p2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "x"}], ")"}], " ", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{"1", "+", 
                 RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}], "-", 
             RowBox[{"\[Mu]", " ", 
              RowBox[{"(", 
               RowBox[{"4", "+", 
                RowBox[{
                 RowBox[{"(", 
                  RowBox[{"4", "+", "k"}], ")"}], " ", "\[Mu]"}]}], ")"}]}]}],
             ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{{3.7319087172176604`*^9, 3.7319087208216605`*^9}, 
   3.73191044976066*^9, 3.732938734981488*^9, 3.7341921414204245`*^9, 
   3.734192268120577*^9, 3.7344408234152126`*^9, 3.740070788551916*^9, 
   3.740381402858203*^9, 3.7405684344855914`*^9, 3.7407410511381426`*^9, 
   3.7408012734148912`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Now", " ", "we", " ", "determine", " ", "the", " ", "optimal", " ", 
    "marginal", " ", "price", " ", "p2", " ", "which", " ", "must", " ", 
    "then", " ", "be", " ", "equal", " ", "to", " ", "the", " ", "p2switch", 
    " ", "and", " ", "this", " ", "equality", " ", "will", " ", "identify", 
    " ", "the", " ", "mixing", " ", 
    RowBox[{"probability", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Simplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"p2", "-", "c", "-", "d"}], ")"}], "q2"}], "+", "F2"}], "/.", 
        RowBox[{"F2", "\[Rule]", "F2mix"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
         RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
      RowBox[{"p1", "\[Rule]", "p1NoRat"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"p2", "-", "c", "-", "d"}], ")"}], "q2"}], "+", "F2"}], "/.", 
      RowBox[{"F2", "\[Rule]", "F2mix"}]}], "/.", 
     RowBox[{"q2", "\[Rule]", "k"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"P2mix", "=", 
     RowBox[{"Simplify", "[", 
      RowBox[{
       RowBox[{"x", " ", 
        RowBox[{"(", "%", ")"}]}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", "x"}], ")"}], 
        RowBox[{"(", "%%", ")"}]}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"D", "[", 
         RowBox[{"P2mix", ",", "p2"}], "]"}], "\[Equal]", "0"}], ",", "p2"}], 
      "]"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"p2switch", "==", 
     RowBox[{"%", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"xequ", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{"%", ",", "x"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.72949697479908*^9, 3.7294970803278513`*^9}, {
   3.729497147395362*^9, 3.72949716049651*^9}, {3.7294978146997375`*^9, 
   3.7294978172268887`*^9}, {3.7318239840706606`*^9, 
   3.7318239956376605`*^9}, {3.7318241011106606`*^9, 
   3.7318241039016604`*^9}, {3.73182418314966*^9, 3.73182418770866*^9}, {
   3.7318242651576605`*^9, 3.7318242667966604`*^9}, {3.7319077903066607`*^9, 
   3.7319078451476603`*^9}, {3.7319086546276608`*^9, 
   3.7319086622836604`*^9}, {3.7319087351626606`*^9, 
   3.7319087448756604`*^9}, {3.7319113861066604`*^9, 
   3.7319113893466606`*^9}, {3.732938723789488*^9, 3.732938759737488*^9}, 
   3.7329388199204884`*^9, {3.732938879025488*^9, 3.732938899016488*^9}, {
   3.7341901089702253`*^9, 3.734190109494878*^9}, {3.734193511611206*^9, 
   3.7341935315197697`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "d"}], ")"}], " ", "\[Gamma]", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", "\[Mu]"}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "-", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SqrtBox[
        RowBox[{
         RowBox[{"-", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", 
             RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}], "+", 
    RowBox[{"c", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], 
    "+", 
    RowBox[{
     SuperscriptBox["\[Gamma]", "2"], " ", "\[Mu]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "2"}], "+", 
          SqrtBox[
           RowBox[{
            RowBox[{"-", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", 
                RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", 
              SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
        "\[Mu]"}]}], ")"}]}]}], ")"}], "/", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"k", " ", 
     SuperscriptBox["\[Gamma]", "3"], " ", "\[Mu]", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "-", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       SqrtBox[
        RowBox[{
         RowBox[{"-", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", 
             RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", 
           SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}], "+", 
    RowBox[{"\[Gamma]", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "d", "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "d", "-", "k"}], ")"}], " ", "\[Mu]"}]}], 
      ")"}]}], "+", 
    RowBox[{"c", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}]}], 
    "+", 
    RowBox[{
     SuperscriptBox["\[Gamma]", "2"], " ", "\[Mu]", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "2"}], "+", 
          SqrtBox[
           RowBox[{
            RowBox[{"-", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", 
                RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", 
              SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
        "\[Mu]"}]}], ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{
  3.732938820384488*^9, {3.732938888822488*^9, 3.732938906174488*^9}, 
   3.734192275017973*^9, {3.7341935196573524`*^9, 3.734193544826171*^9}, 
   3.7344408379027205`*^9, 3.740070800994914*^9, 3.7403814149503613`*^9, 
   3.740568446685015*^9, 3.740741064704499*^9, 3.740801286157254*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Plotting", " ", "the", " ", "equilibrium", " ", "probability", " ", 
    "showing", " ", "that", " ", "it", " ", "is", " ", "qualitatively", " ", 
    "similar", " ", "to", " ", "the", " ", "linear", " ", "pricing", " ", 
    "case"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"xequ", "/.", 
     RowBox[{"c", "\[Rule]", "0"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "1"}], ",", "2"}], "}"}]}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Black"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Thin", ",", "Red"}], "}"}]}], "}"}]}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"d", ",", "0.2"}], "}"}], ",", "0", ",", 
       RowBox[{"1", "-", "\[Gamma]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "1"}], "}"}], ",", "0.1", ",", "10"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7294972537947173`*^9, 3.7294972942375402`*^9}, {
  3.7319107641146603`*^9, 3.73191077974666*^9}, {3.732938969161488*^9, 
  3.732939001504488*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`d$$ = 0.2, $CellContext`\[Gamma]$$ = 
    0.4, $CellContext`\[Mu]$$ = 2, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`d$$], 0.2}, 0, 
      Dynamic[1 - $CellContext`\[Gamma]$$]}, {{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 1}, 0.1, 10}}, Typeset`size$$ = {
    720., {213., 235.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`d$233168$$ = 
    0, $CellContext`\[Gamma]$233173$$ = 0, $CellContext`\[Mu]$233174$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`d$$ = 0.2, $CellContext`\[Gamma]$$ = 
        0.5, $CellContext`\[Mu]$$ = 1}, "ControllerVariables" :> {
        Hold[$CellContext`d$$, $CellContext`d$233168$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$233173$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$233174$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[((-1 + $CellContext`d$$) $CellContext`\[Gamma]$$ (
           1 + $CellContext`\[Mu]$$) (1 + 
           2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
           1 + 2 $CellContext`\[Mu]$$)^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ (-1 + (-2 + (-(-1 + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
              Rational[
               1, 2]) $CellContext`\[Mu]$$))/($CellContext`k $CellContext`\
\[Gamma]$$^3 $CellContext`\[Mu]$$ (1 + 
          
          2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
          1 + 2 $CellContext`\[Mu]$$)^2 + $CellContext`\[Gamma]$$ (1 + 
          2 $CellContext`\[Mu]$$) (-1 + $CellContext`d$$ + (-1 + \
$CellContext`d$$ - $CellContext`k) $CellContext`\[Mu]$$) + $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$ (-1 + (-2 + (-(-1 + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
             Rational[1, 2]) $CellContext`\[Mu]$$)), {$CellContext`k, 0, 1}, 
        PlotRange -> {-1, 2}, PlotStyle -> {{Thick, Black}, {Thin, Red}}], 
      "Specifications" :> {{{$CellContext`d$$, 0.2}, 0, 
         Dynamic[
         1 - $CellContext`\[Gamma]$$]}, {{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {{$CellContext`\[Mu]$$, 1}, 0.1, 10}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {413., 424.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.729497266847067*^9, 3.729497294455936*^9}, 
   3.729497871170452*^9, 3.7318237758686604`*^9, 3.73191078060266*^9, 
   3.7319108107136602`*^9, 3.732939002539488*^9, 3.7341922825385666`*^9, 
   3.7344408449885545`*^9, 3.740070808008486*^9, 3.7403814224767466`*^9, 
   3.740568454488511*^9, 3.740741064858884*^9, 3.740801287113776*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "conditin", " ", "for", " ", "existing", " ", "mixed", " ", 
    "strategy", " ", "is", " ", "then", " ", "as", " ", "usual", " ", 
    "determined", " ", "in", " ", "the", " ", "following"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"dkswitchmix", "=", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{"xequ", "\[Equal]", "0"}], ",", "d"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7294973520146294`*^9, 3.729497387845941*^9}, {
  3.7294975436439466`*^9, 3.729497549259839*^9}, {3.7319108786906605`*^9, 
  3.7319109012186604`*^9}, {3.7319109378506603`*^9, 3.7319109695866604`*^9}, {
  3.7319111186346607`*^9, 3.7319111528356605`*^9}, {3.7319112443546605`*^9, 
  3.7319113077716603`*^9}, {3.732939333536488*^9, 3.732939406687488*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  RowBox[{
   FractionBox["1", 
    RowBox[{"\[Gamma]", " ", 
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"3", " ", "\[Mu]"}], "+", 
       RowBox[{"2", " ", 
        SuperscriptBox["\[Mu]", "2"]}]}], ")"}]}]], 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"2", "+", "\[Gamma]"}], ")"}], " ", "\[Mu]"}]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"c", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         SqrtBox[
          RowBox[{
           RowBox[{"-", 
            SuperscriptBox[
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", 
               RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"2", " ", "\[Mu]"}]}], ")"}]}], "+", 
      RowBox[{"\[Gamma]", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "2"}], "+", 
            SqrtBox[
             RowBox[{
              RowBox[{"-", 
               SuperscriptBox[
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "c", "+", 
                  RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "2"]}], " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", 
                SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}], ")"}], " ", 
          "\[Mu]"}]}], ")"}]}]}], ")"}]}]}]}]], "Output",
 CellChangeTimes->{
  3.7294973612646523`*^9, 3.7294973920326605`*^9, {3.7294975443303337`*^9, 
   3.7294975495562334`*^9}, 3.7294978812810574`*^9, 3.7318238085556602`*^9, 
   3.73190475364266*^9, {3.7319108756376605`*^9, 3.7319108987926607`*^9}, {
   3.7319109344716606`*^9, 3.7319109700456605`*^9}, {3.7319111234756603`*^9, 
   3.7319111534926605`*^9}, {3.7319112689786606`*^9, 
   3.7319113086406603`*^9}, {3.732939401338488*^9, 3.732939406928488*^9}, 
   3.734192284087371*^9, 3.734440846531691*^9, 3.740070809343994*^9, 
   3.7403814240970874`*^9, 3.7405684565128946`*^9, 3.740741066150322*^9, 
   3.740801288506989*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Summarizing", ",", " ", 
    RowBox[{
    "the", " ", "equilibrium", " ", "is", " ", "as", " ", "follows"}]}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"p2switch", ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", 
         RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "<", "0"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Simplify", "[", 
     RowBox[{
      RowBox[{"F2mix", "/.", 
       RowBox[{"x", "->", "xequ"}]}], ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", 
         RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "<", "0"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"xequ", ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", 
         RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "<", "0"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"with", " ", "proba", " ", 
     RowBox[{"(", 
      RowBox[{"1", "-", "xequ"}], ")"}]}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"p1NoRat", ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", 
         RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "<", "0"}]}], "  ", "]"}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"F1dtmp", "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"p1", "->", "p1NoRat"}], ",", 
        RowBox[{"p2", "->", "p2switch"}]}], "}"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"with", " ", "proba", " ", "xequ"}], " ", "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"BR1rationed", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"F1rationed", "/.", 
      RowBox[{"p1", "->", "BR1rationed"}]}], "]"}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.7319113547636604`*^9, 3.7319113762736607`*^9}, {
   3.7319114123936605`*^9, 3.7319114985776606`*^9}, {3.7319115551706605`*^9, 
   3.7319117432996607`*^9}, 3.73191177402966*^9, 3.7319118237246604`*^9, {
   3.7319118704036603`*^9, 3.7319120029806604`*^9}, {3.7319120830126605`*^9, 
   3.7319121129466605`*^9}, {3.7319123648136606`*^9, 
   3.7319124012516603`*^9}, {3.7319126429556603`*^9, 3.7319126557876606`*^9}, 
   3.7319126975966606`*^9, {3.732939421075488*^9, 3.732939467167488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{"xequ", ",", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", 
       RowBox[{"k", " ", "\[Gamma]"}]}], ")"}], "<", "0"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Reduce", "[", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{
     RowBox[{"Numerator", "[", "%", "]"}], "<", 
     RowBox[{"Denominator", "[", "%", "]"}]}], ",", 
    RowBox[{"1", ">", "\[Gamma]", ">", "0"}], ",", 
    RowBox[{"1", ">", "c", "\[GreaterEqual]", "0"}], ",", 
    RowBox[{"1", ">", "d", "\[GreaterEqual]", "0"}], ",", 
    RowBox[{"\[Mu]", ">", "0"}]}], "}"}], "]"}]}], "Input",
 CellChangeTimes->{
  3.734440960061924*^9, {3.734441103542755*^9, 3.7344411572718277`*^9}, 
   3.740804398235648*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"0", "\[LessEqual]", "d", "<", "1"}], "&&", 
  RowBox[{"\[Mu]", ">", "0"}], "&&", 
  RowBox[{"0", "<", "\[Gamma]", "<", "1"}], "&&", 
  RowBox[{"k", "<", "0"}], "&&", 
  RowBox[{"0", "\[LessEqual]", "c", "<", "1"}]}]], "Output",
 CellChangeTimes->{3.734440970157031*^9, 3.7344411594185257`*^9, 
  3.7400708261998205`*^9, 3.7403814404475346`*^9, 3.7405684729265704`*^9, 
  3.7407410823155513`*^9, 3.7408013044654264`*^9, 3.7408044085741405`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Then", " ", "the", " ", "consumer", " ", "surplus", " ", "in", " ", "the", 
   " ", "mixed", " ", "strategy", " ", "equilibrium", " ", "is", " ", "as", 
   " ", "follows"}], "*)"}]], "Input",
 CellChangeTimes->{{3.7318297348426604`*^9, 3.73182975256466*^9}, {
  3.7319040896346607`*^9, 3.7319040914106607`*^9}, {3.732939473070488*^9, 
  3.7329395077584877`*^9}, {3.732939562686488*^9, 3.732939570550488*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{"v", "-", 
    RowBox[{"p1", " ", "q1"}], "-", 
    RowBox[{"p2", " ", "q2"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"%", "/.", 
      RowBox[{"x", "->", "xequ"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
    RowBox[{"p1", "\[Rule]", "p1NoRat"}]}], "/.", 
   RowBox[{"p2", "->", "p2switch"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"%%", "/.", 
      RowBox[{"x", "->", "xequ"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "->", "q1rationed"}], ",", 
       RowBox[{"q2", "\[Rule]", "k"}]}], "}"}]}], "/.", 
    RowBox[{"p2", "->", "p2switch"}]}], "/.", 
   RowBox[{"p1", "->", "BR1rationed"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"VCRmix", "=", " ", 
   RowBox[{
    RowBox[{"xequ", " ", "%"}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", "-", "xequ"}], ")"}], "%%"}]}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.7318298834936604`*^9, 3.7318299290616603`*^9}, 
   3.7318299822776604`*^9, 3.7318316851336603`*^9, 3.7319044959796605`*^9, 
   3.7319113146586604`*^9, {3.7319120407236605`*^9, 3.7319120710356607`*^9}, {
   3.73191212856266*^9, 3.73191214659566*^9}, {3.73191217988566*^9, 
   3.7319122471786604`*^9}, {3.7319122775636606`*^9, 
   3.7319122793706603`*^9}, {3.7319123308436604`*^9, 
   3.7319123318746605`*^9}, {3.73191245005066*^9, 3.7319124850516605`*^9}, 
   3.7319125323236604`*^9, {3.7319125671746607`*^9, 3.7319125899156604`*^9}, {
   3.73191270430766*^9, 3.7319127093986607`*^9}, {3.732944357954488*^9, 
   3.732944369862488*^9}}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Exclusive contracts permitted", "Section",
 CellChangeTimes->{{3.660980757691678*^9, 3.660980759020569*^9}, {
  3.66098100496745*^9, 3.660981008049509*^9}, {3.661849700749787*^9, 
  3.661849703001012*^9}, {3.662097642565343*^9, 3.662097646777343*^9}, {
  3.665986378475314*^9, 3.665986379943461*^9}, {3.6945032842646027`*^9, 
  3.694503303333802*^9}, {3.7155762589702334`*^9, 3.715576275546233*^9}, {
  3.715576325435233*^9, 3.7155763266982336`*^9}, {3.7155802595072336`*^9, 
  3.715580274355233*^9}, {3.732939696636488*^9, 3.732939700141488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Equilibria", " ", "with", " ", "exclusive", " ", "representation"}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "As", " ", "in", " ", "the", " ", "paper", " ", "we", " ", "assume", " ", 
    "that", " ", "firm", " ", "2", " ", "in", " ", "exclusivity", " ", 
    "would", " ", "always", " ", "be", " ", "capacity", " ", "constrained", 
    " ", "and", " ", "makes", " ", "the", " ", "competitive", " ", 
    RowBox[{"offer", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"p2Eequ", "=", 
     RowBox[{"c", "+", "d"}]}], ";", " ", 
    RowBox[{"F2Eequ", "=", "0"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"ProfitBE2k", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{"ve2", "-", 
       RowBox[{"q2", " ", "p2"}], "-", "F2"}], "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"q2", "\[Rule]", "k"}], ",", 
        RowBox[{"p2", "\[Rule]", 
         RowBox[{"c", "+", "d"}]}], ",", 
        RowBox[{"F2", "\[Rule]", "0"}]}], "}"}]}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.6618423547700977`*^9, 3.661842402164837*^9}, {
   3.661842693784996*^9, 3.6618427337959967`*^9}, 3.6618427666382804`*^9, {
   3.6620381379328337`*^9, 3.662038276523689*^9}, 3.662038391813251*^9, {
   3.6620391322414565`*^9, 3.6620391935505877`*^9}, {3.662040390440967*^9, 
   3.662040415806571*^9}, {3.6620404782750435`*^9, 3.6620404816592965`*^9}, {
   3.6620405558322625`*^9, 3.6620405593496094`*^9}, 3.662097377052343*^9, {
   3.665893096333604*^9, 3.665893202001292*^9}, {3.6658935941091976`*^9, 
   3.665893615549497*^9}, {3.667031878723155*^9, 3.66703189758004*^9}, {
   3.6945033070954027`*^9, 3.6945038254914026`*^9}, {3.6945039378094025`*^9, 
   3.6945039505284023`*^9}, {3.6945039845258026`*^9, 3.694503985071802*^9}, {
   3.6945040383634024`*^9, 3.6945040426534023`*^9}, {3.6945042502510023`*^9, 
   3.6945042620602026`*^9}, {3.6945117169787583`*^9, 3.694511717228769*^9}, {
   3.7155753080474334`*^9, 3.7155753080474334`*^9}, 3.7155763693512335`*^9, {
   3.7155802858312335`*^9, 3.7155802963022337`*^9}, {3.7269852700769143`*^9, 
   3.7269852892805147`*^9}, 3.7269853328357143`*^9, {3.72726386679694*^9, 
   3.7272638669250593`*^9}, {3.732939857767488*^9, 3.732939939345488*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", 
   FractionBox["1", "2"]}], " ", "k", " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
   ")"}]}]], "Output",
 CellChangeTimes->{3.732939935354488*^9, 3.7344408624569845`*^9, 
  3.7400708263051004`*^9, 3.7403814405618744`*^9, 3.740568473072959*^9, 
  3.7407410824858813`*^9, 3.7408013045987835`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"The", " ", "unconstrained", " ", "firm", " ", 
    RowBox[{"1", "'"}], "s", " ", "contract"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"ProfitBE1", "-", "ProfitBE2k"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tmpF1m", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"%", "\[Equal]", "0"}], ",", "F1"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Profit1E", "/.", 
     RowBox[{"F1", "\[Rule]", 
      RowBox[{"tmpF1m", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"p1m", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%", ",", "p1"}], "]"}], "\[Equal]", "0"}], ",", "p1"}], 
       "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"F1m", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{"tmpF1m", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "/.", 
      RowBox[{"p1", "\[Rule]", "p1m"}]}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.726916412930395*^9, 3.726916417770395*^9}, {
  3.732939949113488*^9, 3.7329399603614883`*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{"c", "+", "\[Mu]", "+", 
   RowBox[{"c", " ", "\[Mu]"}]}], 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{3.726916434216795*^9, 3.726985360104514*^9, 
  3.727162377159439*^9, 3.727171873595762*^9, 3.7272638852338305`*^9, 
  3.732939960731488*^9, 3.734440862538199*^9, 3.7400708263702726`*^9, 
  3.7403814406310234`*^9, 3.7405684731642013`*^9, 3.7407410826217427`*^9, 
  3.740801304791298*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"2", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}], " ", "k"}], "+", 
   SuperscriptBox["k", "2"], "+", 
   FractionBox[
    RowBox[{
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "c"}], ")"}], "2"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]"}], ")"}], "2"]}], 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]]}], 
  RowBox[{"2", " ", 
   RowBox[{"(", 
    RowBox[{"1", "+", "\[Mu]"}], ")"}]}]]], "Output",
 CellChangeTimes->{3.726916434216795*^9, 3.726985360104514*^9, 
  3.727162377159439*^9, 3.727171873595762*^9, 3.7272638852338305`*^9, 
  3.732939960731488*^9, 3.734440862538199*^9, 3.7400708263702726`*^9, 
  3.7403814406310234`*^9, 3.7405684731642013`*^9, 3.7407410826217427`*^9, 
  3.740801305148244*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"The", " ", "fixed", " ", "fee", " ", "is", " ", "always", " ", 
    RowBox[{"positive", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"F1m", ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", "0", ",", "5"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"c", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7269871758785915`*^9, 3.726987223942191*^9}, {
  3.727162819276439*^9, 3.727162853888439*^9}, {3.7272643168197026`*^9, 
  3.727264322182141*^9}, {3.732939978896488*^9, 3.732940013992488*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0.5, $CellContext`\[Mu]$$ = 2, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Mu]$$], 2}, 0, 5}, {{
       Hold[$CellContext`c$$], 0.5}, 0, 1}}, Typeset`size$$ = {
    720., {348., 369.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Mu]$250017$$ = 
    0, $CellContext`c$250018$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0.5, $CellContext`\[Mu]$$ = 2}, 
      "ControllerVariables" :> {
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$250017$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$250018$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[
       Rational[1, 2] (1 + $CellContext`\[Mu]$$)^(-1) (
         2 (-1 + $CellContext`c$$ + $CellContext`d) $CellContext`k + \
$CellContext`k^2 + (-1 + $CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
            2 $CellContext`\[Mu]$$)^(-2)), {$CellContext`k, 0, 
         1}, {$CellContext`d, 0, 1}, Contours -> {0}], 
      "Specifications" :> {{{$CellContext`\[Mu]$$, 2}, 0, 
         5}, {{$CellContext`c$$, 0.5}, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {469., 480.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.726987224581791*^9, 3.727162810746439*^9, 
  3.727162855862439*^9, 3.727171874772046*^9, 3.727264322582363*^9, 
  3.7329400147834883`*^9, 3.734440862857048*^9, 3.740070826696141*^9, 
  3.740381440971932*^9, 3.74056847353423*^9, 3.740741083029004*^9, 
  3.7408013053177247`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "In", " ", "the", " ", "black", " ", "area", " ", "it", " ", "must", " ", 
     "be", " ", "F1"}], "=", 
    RowBox[{
    "0", " ", "and", " ", "p1", " ", "as", " ", "with", " ", "linear", " ", 
     RowBox[{"pricing", ":"}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"ProfitBE1", "-", "ProfitBE2k"}], "/.", 
     RowBox[{"F1", "\[Rule]", "0"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"%", "\[Equal]", "0"}], ",", "p1"}], "]"}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"p1Eequcorn", "=", 
    RowBox[{"%", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"F1Eequbcorn", "=", "0"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "Note", " ", "that", " ", "this", " ", "implies", " ", "that", " ", 
     "linear", " ", "pricing", " ", "realize", " ", "even", " ", "for", " ", 
     "finite", " ", 
     RowBox[{"\[Mu]", "."}]}], "*)"}]}]}]], "Input",
 CellChangeTimes->{{3.726916733653795*^9, 3.726916789323395*^9}, {
  3.7329400223504877`*^9, 3.732940086822488*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"1", "-", 
      SqrtBox[
       RowBox[{
        RowBox[{"-", "k"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
         ")"}]}]]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"1", "+", 
      SqrtBox[
       RowBox[{
        RowBox[{"-", "k"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
         ")"}]}]]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.726916754714595*^9, 3.7269167981483946`*^9}, 
   3.7269853722725143`*^9, 3.727162692562439*^9, 3.7271718747971177`*^9, 
   3.7272643286360755`*^9, 3.732940046061488*^9, 3.734440862932247*^9, 
   3.7400708269368134`*^9, 3.7403814411323586`*^9, 3.740568473742775*^9, 
   3.7407410832470694`*^9, 3.7408013054420576`*^9}],

Cell[BoxData[
 RowBox[{"1", "-", 
  SqrtBox[
   RowBox[{
    RowBox[{"-", "k"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
     ")"}]}]]}]], "Output",
 CellChangeTimes->{{3.726916754714595*^9, 3.7269167981483946`*^9}, 
   3.7269853722725143`*^9, 3.727162692562439*^9, 3.7271718747971177`*^9, 
   3.7272643286360755`*^9, 3.732940046061488*^9, 3.734440862932247*^9, 
   3.7400708269368134`*^9, 3.7403814411323586`*^9, 3.740568473742775*^9, 
   3.7407410832470694`*^9, 3.7408013054440627`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"p1", "\[Rule]", 
        RowBox[{"1", "-", 
         SqrtBox[
          RowBox[{
           RowBox[{"-", "k"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}],
             ")"}]}]]}]}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"p1", "\[Rule]", 
        RowBox[{"1", "+", 
         SqrtBox[
          RowBox[{
           RowBox[{"-", "k"}], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}],
             ")"}]}]]}]}], "}"}]}], "}"}], "/.", 
    RowBox[{"k", "\[Rule]", 
     RowBox[{"1", "-", 
      RowBox[{"(", 
       RowBox[{"c", "+", "d"}], ")"}]}]}]}], ",", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "1"}], "+", "c", "+", "d"}], "<", "0"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.7407301923989477`*^9, 3.740730227043399*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"c", "+", "d"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"2", "-", "c", "-", "d"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.7407302094503593`*^9, 3.7407302278695498`*^9}, 
   3.7407410833390512`*^9, 3.7408013055332685`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"F1m", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}], "[", 
  RowBox[{"[", 
   RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{"%", ",", 
     RowBox[{"{", 
      RowBox[{"k", ",", "0", ",", "1"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", "0", ",", "100"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"c", ",", "0.2"}], "}"}], ",", "0", ",", "1"}], "}"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.7269877856045914`*^9, 3.7269877973201914`*^9}, {
  3.726987939404991*^9, 3.7269879656129913`*^9}, {3.7272644476353064`*^9, 
  3.727264506972361*^9}, {3.732940102730488*^9, 3.7329401355934877`*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c"}], ")"}], " ", "k"}], "+", 
    SuperscriptBox["k", "2"], "+", 
    FractionBox[
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c"}], ")"}], "2"], " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"1", "+", "\[Mu]"}], ")"}], "2"]}], 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]]}], 
   RowBox[{"2", " ", "k"}]]}]], "Output",
 CellChangeTimes->{
  3.7269877976789913`*^9, {3.726987942228591*^9, 3.726987968218191*^9}, 
   3.7271718748653636`*^9, {3.7272644713472867`*^9, 3.7272645073530025`*^9}, {
   3.7329401071664877`*^9, 3.7329401363614883`*^9}, 3.7344408631438556`*^9, 
   3.7400708272456007`*^9, 3.74038144140709*^9, 3.7405684741588926`*^9, 
   3.7407410836145773`*^9, 3.7408013057989736`*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0.2, $CellContext`d$$ = 
    0, $CellContext`\[Mu]$$ = 2, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Mu]$$], 2}, 0, 100}, {
      Hold[$CellContext`d$$], 0, 1}, {{
       Hold[$CellContext`c$$], 0.2}, 0, 1}}, Typeset`size$$ = {
    720., {203., 223.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Mu]$250573$$ = 
    0, $CellContext`d$250574$$ = 0, $CellContext`c$250575$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0.2, $CellContext`d$$ = 
        0, $CellContext`\[Mu]$$ = 2}, "ControllerVariables" :> {
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$250573$$, 0], 
        Hold[$CellContext`d$$, $CellContext`d$250574$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$250575$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[Rational[-1, 2] $CellContext`k^(-1) (
         2 (-1 + $CellContext`c$$) $CellContext`k + $CellContext`k^2 + (-1 + \
$CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
            2 $CellContext`\[Mu]$$)^(-2)), {$CellContext`k, 0, 1}], 
      "Specifications" :> {{{$CellContext`\[Mu]$$, 2}, 0, 
         100}, {$CellContext`d$$, 0, 1}, {{$CellContext`c$$, 0.2}, 0, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {351., 362.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.7269877976789913`*^9, {3.726987942228591*^9, 3.726987968218191*^9}, 
   3.7271718748653636`*^9, {3.7272644713472867`*^9, 3.7272645073530025`*^9}, {
   3.7329401071664877`*^9, 3.7329401363614883`*^9}, 3.7344408631438556`*^9, 
   3.7400708272456007`*^9, 3.74038144140709*^9, 3.7405684741588926`*^9, 
   3.7407410836145773`*^9, 3.740801305808031*^9}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["\<\
Welfare effect of exclusivity anf Figure 1\
\>", "Section",
 CellChangeTimes->{{3.732939655782488*^9, 3.732939666580488*^9}, {
  3.7405755020634556`*^9, 3.740575506250597*^9}}],

Cell[CellGroupData[{

Cell["Pure strategy", "Subsection",
 CellChangeTimes->{{3.732940234021488*^9, 3.7329402362364883`*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"v", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{"p2", " ", "q2"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "->", "q1NE"}], ",", 
       RowBox[{"q2", "->", "q2NE"}]}], "}"}]}], "/.", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
      RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"ve1", "-", 
      RowBox[{"p1", " ", "q1"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{"q1", "\[Rule]", 
       RowBox[{"1", "-", "p1"}]}], "}"}]}], "/.", 
    RowBox[{"{", 
     RowBox[{"p1", "\[Rule]", "p1Eequcorn"}], "}"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"%", "-", "%%"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dWelfPure", "=", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"%", "\[Equal]", "0"}], ",", "d"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.727172747597912*^9, 3.7271727486975374`*^9}, {
   3.7271727915501356`*^9, 3.727172832403145*^9}, {3.7271728736309843`*^9, 
   3.727173007688361*^9}, 3.7271732416050005`*^9, 3.7272645246798487`*^9, {
   3.7272645759092774`*^9, 3.727264578398803*^9}, {3.732944509752488*^9, 
   3.732944510438488*^9}, {3.732944566096488*^9, 3.732944566713488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"dWelfPure", "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dWelfPure", "[", 
   RowBox[{"[", 
    RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"%", ",", "%%"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"k", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "1"}], "}"}]}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Mu]", ",", "1"}], "}"}], ",", "0", ",", "100"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Gamma]", ",", "0.3"}], "}"}], ",", "0", ",", "1"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{"c", ",", "0", ",", "1"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.7271730222271967`*^9, 3.7271731798797474`*^9}, {
  3.72717323823689*^9, 3.727173239259487*^9}, {3.727264559088005*^9, 
  3.727264561846052*^9}, {3.732944514855488*^9, 3.732944534623488*^9}, {
  3.732944571106488*^9, 3.732944572728488*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 
    0.3, $CellContext`\[Mu]$$ = 1, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Mu]$$], 1}, 0, 100}, {{
       Hold[$CellContext`\[Gamma]$$], 0.3}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}}, Typeset`size$$ = {720., {226., 248.}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = 
    True, $CellContext`\[Mu]$253160$$ = 0, $CellContext`\[Gamma]$253161$$ = 
    0, $CellContext`c$253162$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 
        0.3, $CellContext`\[Mu]$$ = 1}, "ControllerVariables" :> {
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$253160$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$253161$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$253162$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{Rational[
          1, 2] (-1 - 6 $CellContext`\[Mu]$$ + 
           2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
           13 $CellContext`\[Mu]$$^2 + 
           7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
           12 $CellContext`\[Mu]$$^3 + 
           8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Mu]$$^4 + 
           3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) (-2 + 
          2 $CellContext`c$$ + 2 $CellContext`k + 2 $CellContext`\[Gamma]$$ - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
          2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
          12 $CellContext`\[Mu]$$ + 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
          16 $CellContext`k $CellContext`\[Mu]$$ + 
          8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
          4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          26 $CellContext`\[Mu]$$^2 + 
          26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
          48 $CellContext`k $CellContext`\[Mu]$$^2 + 
          10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
          14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
          14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
          52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
          2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
          4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
          24 $CellContext`\[Mu]$$^3 + 
          24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
          64 $CellContext`k $CellContext`\[Mu]$$^3 + 
          4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
          16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
          16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
          80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
          4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
          16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
          8 $CellContext`\[Mu]$$^4 + 
          8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
          32 $CellContext`k $CellContext`\[Mu]$$^4 + 
          6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
          18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + \
((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 2 $CellContext`\[Gamma]$$ + 
              2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
              2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
              12 $CellContext`\[Mu]$$ - 
              12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
              16 $CellContext`k $CellContext`\[Mu]$$ - 
              8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
              8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
              4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
              16 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 26 $CellContext`\[Mu]$$^2 - 
              26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
              48 $CellContext`k $CellContext`\[Mu]$$^2 - 
              10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
              10 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
              14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
              52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
              2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 - 
              4 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 + 24 $CellContext`\[Mu]$$^3 - 
              24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
              64 $CellContext`k $CellContext`\[Mu]$$^3 - 
              4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
              80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 - 
              16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
              8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              32 $CellContext`k $CellContext`\[Mu]$$^4 - 
              6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
              6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
              48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
              2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 - 
              18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 + 
              2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4)^2 - 
            4 (-1 - 6 $CellContext`\[Mu]$$ + 
             2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
             13 $CellContext`\[Mu]$$^2 + 
             7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
             12 $CellContext`\[Mu]$$^3 + 
             8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
             4 $CellContext`\[Mu]$$^4 + 
             3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
             4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 2 $CellContext`k - 
             2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
             2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
             2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^2 - 12 $CellContext`\[Mu]$$ + 
             24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
             12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
             16 $CellContext`k $CellContext`\[Mu]$$ - 
             16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
             8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
             8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             
             8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
             16 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 26 $CellContext`\[Mu]$$^2 + 
             52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
             26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
             48 $CellContext`k $CellContext`\[Mu]$$^2 - 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
             24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
             10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
             20 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
             28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
             52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             52 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
             4 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
             4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
             2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
             48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
             24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
             64 $CellContext`k $CellContext`\[Mu]$$^3 - 
             64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
             32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
             4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
             8 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
             32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
             80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
             8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
             16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
             16 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
             8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
             8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
             32 $CellContext`k $CellContext`\[Mu]$$^4 - 
             32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
             16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
             6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
             12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
             18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
             18 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
             9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
             2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 + 
             2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 + $CellContext`k^2 $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2]), 
         Rational[
          1, 2] (-1 - 6 $CellContext`\[Mu]$$ + 
           2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
           13 $CellContext`\[Mu]$$^2 + 
           7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
           12 $CellContext`\[Mu]$$^3 + 
           8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Mu]$$^4 + 
           3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) (-2 + 
          2 $CellContext`c$$ + 2 $CellContext`k + 2 $CellContext`\[Gamma]$$ - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
          2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
          12 $CellContext`\[Mu]$$ + 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
          16 $CellContext`k $CellContext`\[Mu]$$ + 
          8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
          4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          26 $CellContext`\[Mu]$$^2 + 
          26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
          48 $CellContext`k $CellContext`\[Mu]$$^2 + 
          10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
          14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
          
          14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
          52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
          2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
          4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
          24 $CellContext`\[Mu]$$^3 + 
          24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
          64 $CellContext`k $CellContext`\[Mu]$$^3 + 
          4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
          16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
          16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
          80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
          4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
          16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
          8 $CellContext`\[Mu]$$^4 + 
          8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
          32 $CellContext`k $CellContext`\[Mu]$$^4 + 
          6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
          18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 - \
((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 2 $CellContext`\[Gamma]$$ + 
             2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
             2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
             12 $CellContext`\[Mu]$$ - 
             12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
             16 $CellContext`k $CellContext`\[Mu]$$ - 
             8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
             26 $CellContext`\[Mu]$$^2 - 
             26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
             48 $CellContext`k $CellContext`\[Mu]$$^2 - 
             10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
             10 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
             14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
             2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 - 
             4 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 + 24 $CellContext`\[Mu]$$^3 - 
             24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
             64 $CellContext`k $CellContext`\[Mu]$$^3 - 
             4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 - 
             16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
             8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
             32 $CellContext`k $CellContext`\[Mu]$$^4 - 
             6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
             6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
             2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 - 
             
             18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 + 
             2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4)^2 - 
           4 (-1 - 6 $CellContext`\[Mu]$$ + 
            2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
            13 $CellContext`\[Mu]$$^2 + 
            7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
            12 $CellContext`\[Mu]$$^3 + 
            8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
            4 $CellContext`\[Mu]$$^4 + 
            3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
            4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 2 $CellContext`k - 
            2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
            2 $CellContext`\[Gamma]$$ - 
            4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
            2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
            2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
            2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^2 - 12 $CellContext`\[Mu]$$ + 
            24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
            12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
            16 $CellContext`k $CellContext`\[Mu]$$ - 
            16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
            8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
            8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
            16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
            8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
            4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
            8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
            4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
            16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
            16 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
            8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
            26 $CellContext`\[Mu]$$^2 + 
            52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
            26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
            48 $CellContext`k $CellContext`\[Mu]$$^2 - 
            48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
            24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
            10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
            20 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
            10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
            28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
            52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            52 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
            4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
            2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
            4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
            4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
            2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
            48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
            24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
            64 $CellContext`k $CellContext`\[Mu]$$^3 - 
            64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
            32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
            4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
            8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
            4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
            32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
            80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            
            80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
            8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
            4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
            16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
            16 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
            8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
            16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
            8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
            32 $CellContext`k $CellContext`\[Mu]$$^4 - 
            32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
            16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
            6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
            12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
            48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
            4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
            2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
            18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
            18 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
            9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
            2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + 
            2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 + $CellContext`k^2 $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])}, {$CellContext`k, 0, 1}, 
        PlotRange -> {0, 1}], 
      "Specifications" :> {{{$CellContext`\[Mu]$$, 1}, 0, 
         100}, {{$CellContext`\[Gamma]$$, 0.3}, 0, 1}, {$CellContext`c$$, 0, 
         1}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {375., 386.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.727173063429511*^9, 3.7271731801464643`*^9}, 
   3.7271732541154847`*^9, 3.7272645853779373`*^9, 3.732943156063488*^9, {
   3.732944519984488*^9, 3.732944535073488*^9}, 3.732944575022488*^9, 
   3.7344408646016846`*^9, 3.7400708287586603`*^9, 3.7403814429472246`*^9, 
   3.7405684757721725`*^9, 3.7407410853472557`*^9, 3.740801307393217*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Mixed strategy", "Subsection",
 CellChangeTimes->{{3.732940207381488*^9, 3.7329402137324877`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Ve2", "=", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{
    RowBox[{"ve2", "-", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"c", "+", "d"}], ")"}], " ", "q2"}]}], "/.", 
    RowBox[{"q2", "\[Rule]", "k"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.71973087792388*^9, 3.71973096787348*^9}, {
  3.7202494444941483`*^9, 3.7202494635243382`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", 
   FractionBox["1", "2"]}], " ", "k", " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
   ")"}]}]], "Output",
 CellChangeTimes->{3.71973093721948*^9, 3.71973096976108*^9, 
  3.7202493171248713`*^9, 3.720249496034663*^9, 3.7235545871025515`*^9, 
  3.7242472549574003`*^9, 3.7242472952056837`*^9, 3.7243118668596177`*^9, 
  3.724398039380813*^9, 3.7244066534041853`*^9, 3.725864543546733*^9, 
  3.726202146003965*^9, 3.726227562139764*^9, 3.726552011936591*^9, 
  3.726914460801995*^9, 3.72701507641513*^9, 3.727075435065806*^9, 
  3.727155531161439*^9, 3.7271656314278393`*^9, 3.7272465859232454`*^9, 
  3.7293419772216063`*^9, 3.7294922611450253`*^9, 3.7318218305086603`*^9, 
  3.7319025743176603`*^9, 3.7319127909236603`*^9, 3.732943374352488*^9, 
  3.7344408646357737`*^9, 3.74007082889198*^9, 3.7403814430725183`*^9, 
  3.740568475962648*^9, 3.740741085424199*^9, 3.7408013074483614`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"dWelfaremix", "=", 
   RowBox[{"Simplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"VCRmix", "-", "Ve2"}], "\[Equal]", "0"}], ",", "d"}], "]"}], 
    "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.7319128285466604`*^9, 3.7319128728026605`*^9}, {
  3.732943564821488*^9, 3.732943565955488*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Now", " ", "an", " ", "analysis", " ", "of", " ", "Figure", " ", "1"}], 
   "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"dkswitchmix", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dWelfaremix", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dWelfPure", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"%", ",", "%%", ",", "%%%", ",", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "-", "c"}], ")"}], 
          RowBox[{"(", 
           RowBox[{"1", "-", "\[Gamma]"}], ")"}]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0.001", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "1"}], "}"}]}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
         "Magenta", ",", "Blue", ",", "Green", ",", " ", "Black", ",", 
          "Thick", ",", 
          RowBox[{"{", 
           RowBox[{"Green", ",", " ", "Dotted"}], "}"}]}], "}"}]}]}], "]"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.6"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"c", ",", "0.0001"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "100"}], "}"}], ",", "0", ",", "100"}], "}"}]}],
     "]"}]}]}]], "Input",
 CellChangeTimes->{{3.732943889160488*^9, 3.732943895473488*^9}, {
  3.732943936337488*^9, 3.732943943806488*^9}, {3.732943995297488*^9, 
  3.732944010113488*^9}, {3.7329445870264883`*^9, 3.732944587711488*^9}, {
  3.732944659961488*^9, 3.732944753904488*^9}, {3.7403837541041603`*^9, 
  3.7403838131662283`*^9}, {3.740383856410266*^9, 3.7403840562577047`*^9}, {
  3.7403842391697707`*^9, 3.740384239303125*^9}, {3.7405689507375755`*^9, 
  3.7405689563214664`*^9}, {3.7408041515620527`*^9, 3.7408041532966995`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0.0001, $CellContext`\[Gamma]$$ = 
    0.2, $CellContext`\[Mu]$$ = 2, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.6}, 0, 1}, {{
       Hold[$CellContext`c$$], 0.0001}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 100}, 0, 100}}, Typeset`size$$ = {
    720., {226., 247.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$253185$$ = 
    0, $CellContext`c$253186$$ = 0, $CellContext`\[Mu]$253187$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0.0001, $CellContext`\[Gamma]$$ = 
        0.6, $CellContext`\[Mu]$$ = 100}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$253185$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$253186$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$253187$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{Rational[
          1, 2] (-1 - 6 $CellContext`\[Mu]$$ + 
           2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
           13 $CellContext`\[Mu]$$^2 + 
           7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
           12 $CellContext`\[Mu]$$^3 + 
           8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Mu]$$^4 + 
           3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) (-2 + 
          2 $CellContext`c$$ + 2 $CellContext`k + 2 $CellContext`\[Gamma]$$ - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
          2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
          12 $CellContext`\[Mu]$$ + 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
          16 $CellContext`k $CellContext`\[Mu]$$ + 
          8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
          4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          26 $CellContext`\[Mu]$$^2 + 
          26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
          48 $CellContext`k $CellContext`\[Mu]$$^2 + 
          10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
          14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
          14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
          52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
          2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
          4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
          24 $CellContext`\[Mu]$$^3 + 
          24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
          64 $CellContext`k $CellContext`\[Mu]$$^3 + 
          4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
          16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
          16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
          80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
          4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
          16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
          8 $CellContext`\[Mu]$$^4 + 
          8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
          32 $CellContext`k $CellContext`\[Mu]$$^4 + 
          6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
          18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 - \
((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 2 $CellContext`\[Gamma]$$ + 
             2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
             2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
             12 $CellContext`\[Mu]$$ - 
             12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
             16 $CellContext`k $CellContext`\[Mu]$$ - 
             8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
             26 $CellContext`\[Mu]$$^2 - 
             26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
             48 $CellContext`k $CellContext`\[Mu]$$^2 - 
             10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
             10 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
             14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
             2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 - 
             4 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 + 24 $CellContext`\[Mu]$$^3 - 
             24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
             64 $CellContext`k $CellContext`\[Mu]$$^3 - 
             4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 - 
             16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
             8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
             32 $CellContext`k $CellContext`\[Mu]$$^4 - 
             6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
             6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
             2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 - 
             18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 + 
             2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4)^2 - 
           4 (-1 - 6 $CellContext`\[Mu]$$ + 
            2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
            13 $CellContext`\[Mu]$$^2 + 
            7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
            12 $CellContext`\[Mu]$$^3 + 
            8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
            4 $CellContext`\[Mu]$$^4 + 
            3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
            4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 2 $CellContext`k - 
            2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
            2 $CellContext`\[Gamma]$$ - 
            4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
            2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
            2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
            2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^2 - 12 $CellContext`\[Mu]$$ + 
            24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
            12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
            16 $CellContext`k $CellContext`\[Mu]$$ - 
            16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
            8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
            8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
            16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
            8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
            4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
            8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
            4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
            16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
            16 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
            8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
            26 $CellContext`\[Mu]$$^2 + 
            52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
            26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
            48 $CellContext`k $CellContext`\[Mu]$$^2 - 
            48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
            24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
            10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
            20 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
            10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
            28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
            52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            52 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
            4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
            2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
            4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
            4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
            2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
            48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
            24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
            64 $CellContext`k $CellContext`\[Mu]$$^3 - 
            64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
            32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
            4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
            8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
            4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
            32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
            80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
            8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
            4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
            16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
            16 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
            8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
            16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
            8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
            32 $CellContext`k $CellContext`\[Mu]$$^4 - 
            32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
            16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
            6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
            12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
            48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
            4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
            2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
            18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
            18 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
            9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
            2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + 
            2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 + $CellContext`k^2 $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2]), 
         Rational[-1, 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
           1 + $CellContext`\[Mu]$$)^(-1) (1 + 2 $CellContext`\[Mu]$$)^(-3) (
          4 $CellContext`k $CellContext`\[Gamma]$$ - 
          4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]$$^2 - 4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
          4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
          2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
          2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
          4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
           Rational[1, 2] + 
          30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
          5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          28 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
          
          28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
          2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
          12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
          12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
          7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$ - 
          30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
           Rational[1, 2] $CellContext`\[Mu]$$ + 
          84 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
          18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
          9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
          72 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
          72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
          12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
          30 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
          30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
          21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
          84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
           Rational[1, 2] $CellContext`\[Mu]$$^2 + 
          2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
            Rational[1, 2] $CellContext`\[Mu]$$^2 + 
          104 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
          14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
          7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
          80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
          80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
          24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
          38 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
          38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
          31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
          104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
           Rational[1, 2] $CellContext`\[Mu]$$^3 + 
          8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
            Rational[1, 2] $CellContext`\[Mu]$$^3 + 
          48 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
          48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
          4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
          32 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
          32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
          16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
          20 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
          20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
          18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
          48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
           Rational[1, 2] $CellContext`\[Mu]$$^4 + 
          8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
            Rational[
             1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
              2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
             4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 \
$CellContext`\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
             8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
               2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
             4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                2 $CellContext`k $CellContext`\[Mu]$$)^2 - $CellContext`k^3 \
$CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
              63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
              511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
              257 $CellContext`\[Mu]$$^6) - 
             4 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ (1 + 
               2 $CellContext`\[Mu]$$)^2 (1 + 
              4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
              3 $CellContext`\[Mu]$$ + 
              22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
              3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
               Rational[1, 2] $CellContext`\[Mu]$$ + 3 $CellContext`\[Mu]$$^2 + 
              40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
              3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
               Rational[1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
              24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
               Rational[
                1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                 1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                 1 + $CellContext`\[Mu]$$)^3) + $CellContext`k $CellContext`\
\[Gamma]$$^3 (-3 + 
               2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                200 $CellContext`k^2 + 
                4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
               4 (-4 - 199 $CellContext`k^2 + 
                5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                1580 $CellContext`k^2 + 
                36 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
               2 (-23 - 784 $CellContext`k^2 + 
                14 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                624 $CellContext`k^2 + 
                8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[
                   1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                  1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                 7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
               2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                 5 $CellContext`\[Mu]$$ + (-7 + 
                   2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                   4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
              18 $CellContext`\[Mu]$$ - (65 + 
               4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                 Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
              12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
              3 (-147 + 
                4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
              2 (-257 + 
                34 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                56 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (
                3 + 18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                514 $CellContext`\[Mu]$$^5 + 
                243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 (-1 - 
              2 (3 + 2 $CellContext`k^2 (-4 + 
                 3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
               4 $CellContext`k^2 (-43 + 
                 31 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
              4 (5 + $CellContext`k^2 (-180 + 
                 127 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
               148 $CellContext`k^2 (-10 + 
                 7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
              2 (3 + 16 $CellContext`k^2 (-47 + 
                 33 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
               16 $CellContext`k^2 (-38 + 
                 27 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
              3 $CellContext`c$$^2 (
                1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                 1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                  172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                  720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                  608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
           Rational[1, 2]), -$CellContext`\[Gamma]$$^(-1) (
          1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
           3 $CellContext`\[Mu]$$ + 
           2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
            2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
            Rational[1, 2]) (1 + 
           2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$)), (
          1 - $CellContext`c$$) (
          1 - $CellContext`\[Gamma]$$)}, {$CellContext`k, 0.001, 1}, 
        PlotRange -> {0, 1}, 
        PlotStyle -> {Magenta, Blue, Green, Black, Thick, {Green, Dotted}}], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.6}, 0, 
         1}, {{$CellContext`c$$, 0.0001}, 0, 1}, {{$CellContext`\[Mu]$$, 100},
          0, 100}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {426., 437.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.732943899082488*^9, 3.732943944645488*^9, {3.7329439959674883`*^9, 
   3.732944010803488*^9}, 3.732944590200488*^9, 3.7329446895744877`*^9, {
   3.732944721737488*^9, 3.732944754233488*^9}, 3.7344408746594152`*^9, 
   3.740070838644949*^9, 3.740381452907673*^9, {3.7403837763753867`*^9, 
   3.7403838138450336`*^9}, {3.740383894118511*^9, 3.7403839065054893`*^9}, 
   3.7403839388424516`*^9, {3.7403840149638867`*^9, 3.7403840372381244`*^9}, {
   3.7403842341003237`*^9, 3.74038423972325*^9}, 3.740568485773755*^9, 
   3.740568924219039*^9, 3.740741096174918*^9, 3.7408013186020236`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "To", " ", "obtain", " ", "the", " ", "picture", " ", "in", " ", "the", 
    " ", "paper", " ", "we", " ", "also", " ", "add", " ", "the", " ", 
    "frontier", " ", "for", " ", "firm", " ", 
    RowBox[{"1", "'"}], "s", " ", "profit"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"PROFIT1NExclPure", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"p1", "-", "c"}], ")"}], "q1"}], "+", "F1NE"}], "/.", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"q1", "->", "q1NE"}], ",", 
          RowBox[{"q2", "->", "q2NE"}]}], "}"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
         RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"P1Norationed", ";"}], "\[IndentingNewLine]", 
   RowBox[{"P1rationed", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"PROFIT1NExclMix", "=", 
     RowBox[{
      RowBox[{"xequ", "  ", "%"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", "xequ"}], ")"}], " ", "%%"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"PROFIT1ExclConstr", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{"p1", "-", "c"}], ")"}], "q1"}], "/.", 
        RowBox[{"q1", "\[Rule]", "q1e"}]}], "/.", 
       RowBox[{"p1", "->", "p1Eequcorn"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"PROFIT1ExclUnconstr", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"p1", "-", "c"}], ")"}], "q1"}], "+", "F1m"}], "/.", 
        RowBox[{"q1", "\[Rule]", "q1e"}]}], "/.", 
       RowBox[{"p1", "\[Rule]", "p1m"}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"PROFIT1ExclConstr", "-", "PROFIT1NExclMix"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dProfit1Mix", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"%", "\[Equal]", "0"}], ",", "d"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"PROFIT1ExclUnconstr", "-", "PROFIT1NExclMix"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dProfit1MixUnconstr", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"%", "\[Equal]", "0"}], ",", "d"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.7324192655966606`*^9, 3.7324194892646604`*^9}, {
   3.7324195522876606`*^9, 3.7324196636806602`*^9}, {3.7324211114886603`*^9, 
   3.7324211363686604`*^9}, {3.7403850914653587`*^9, 
   3.7403852342069645`*^9}, {3.740385481075494*^9, 3.7403855169980507`*^9}, {
   3.7405695365408945`*^9, 3.740569537514485*^9}, {3.740569575702141*^9, 
   3.740569577808702*^9}, {3.7405698011319313`*^9, 3.740569815932313*^9}, {
   3.740569846709205*^9, 3.740569848937133*^9}, {3.740570086244572*^9, 
   3.7405700902974005`*^9}, {3.7405704412174854`*^9, 
   3.7405704503908978`*^9}, {3.740570536218234*^9, 3.740570547528329*^9}, {
   3.7405706254667115`*^9, 3.7405706616189065`*^9}, {3.740570724071089*^9, 
   3.740570724370879*^9}, 3.740570965615796*^9, {3.740804580629738*^9, 
   3.7408045823733406`*^9}, {3.7408052414247103`*^9, 
   3.7408052419120045`*^9}, {3.74080571012661*^9, 3.7408057283787622`*^9}, {
   3.740805987231792*^9, 3.740806059585882*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Another", " ", "useful", " ", "boundary"}], "*)"}], 
  "\[IndentingNewLine]", " ", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"dWelfPure", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "\[Equal]", 
     RowBox[{"1", "-", "c", "-", "k"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"kWelMax", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{"%", ",", "k"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{{3.7405691137617664`*^9, 3.740569173069582*^9}, 
   3.740569277162593*^9, {3.740570709724909*^9, 3.7405707171266117`*^9}, {
   3.7405714077264833`*^9, 3.740571414877559*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"NotebookDirectory", "[", "]"}], "\[IndentingNewLine]", 
 RowBox[{"ParentDirectory", "[", "]"}]}], "Input",
 CellChangeTimes->{{3.740572975638824*^9, 3.740572983580957*^9}, {
  3.740573027006505*^9, 3.740573047260398*^9}}],

Cell[BoxData["\<\"C:\\\\Users\\\\Giacomo\\\\Dropbox\\\\Papers\\\\Vincenzo\\\\\
AECTest\\\\Online_Appendixes\\\\\"\>"], "Output",
 CellChangeTimes->{{3.7405729806702127`*^9, 3.7405729840812883`*^9}, {
   3.7405730240536504`*^9, 3.74057304848967*^9}, 3.740741101730858*^9, 
   3.7408013247088337`*^9}],

Cell[BoxData["\<\"C:\\\\Users\\\\Giacomo\"\>"], "Output",
 CellChangeTimes->{{3.7405729806702127`*^9, 3.7405729840812883`*^9}, {
   3.7405730240536504`*^9, 3.74057304848967*^9}, 3.740741101730858*^9, 
   3.74080132471084*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Figure", " ", "1", " ", "in", " ", "the", " ", "paper"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"parameters", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.4"}], ",", 
       RowBox[{"\[Mu]", "\[Rule]", "2"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"first", " ", "preparing", " ", "some", " ", "thresholds"}], 
    "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"dProfit1MixUnconstr", "==", "dProfit1Mix"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"kswitchProfit1", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{"%", ",", "k"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Factor", "[", 
     RowBox[{
      RowBox[{"PROFIT1ExclConstr", "-", "PROFIT1NExclPure"}], "/.", 
      "parameters"}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dProfit1Pure", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Numerator", "[", "%", "]"}], "\[Equal]", "0"}], ",", "d"}], 
       "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "These", " ", "are", " ", "the", " ", "four", " ", "plotted", " ", 
     "thresholds"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Piecewise", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Piecewise", "[", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"{", 
              RowBox[{"dProfit1MixUnconstr", ",", 
               RowBox[{"k", "\[LessEqual]", "kswitchProfit1"}]}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{"Max", "[", 
                RowBox[{"dProfit1Mix", ",", "dProfit1Pure"}], "]"}], ",", 
               RowBox[{"k", ">", "kswitchProfit1"}]}], "}"}]}], "}"}], "]"}], 
          ",", 
          RowBox[{
           RowBox[{"Piecewise", "[", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"{", 
               RowBox[{"dProfit1MixUnconstr", ",", 
                RowBox[{"k", "\[LessEqual]", "kswitchProfit1"}]}], "}"}], ",", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Max", "[", 
                 RowBox[{"dProfit1Mix", ",", "dProfit1Pure"}], "]"}], ",", 
                RowBox[{"k", ">", "kswitchProfit1"}]}], "}"}]}], "}"}], "]"}],
            "\[LessEqual]", " ", 
           RowBox[{"1", "-", "c", "-", "k"}]}]}], "\[IndentingNewLine]", 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Null", ",", 
          RowBox[{
           RowBox[{"Piecewise", "[", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"{", 
               RowBox[{"dProfit1MixUnconstr", ",", 
                RowBox[{"k", "\[LessEqual]", "kswitchProfit1"}]}], "}"}], ",", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Max", "[", 
                 RowBox[{"dProfit1Mix", ",", "dProfit1Pure"}], "]"}], ",", 
                RowBox[{"k", ">", "kswitchProfit1"}]}], "}"}]}], "}"}], "]"}],
            ">", 
           RowBox[{"1", "-", "c", "-", "k"}]}]}], "}"}]}], "}"}], "]"}], "/.",
      "parameters"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Min", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", "c"}], ")"}], 
        RowBox[{"(", 
         RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", 
       RowBox[{"1", "-", "c", "-", "k"}]}], "]"}], "/.", "parameters"}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Min", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", "c"}], ")"}], 
        RowBox[{"(", 
         RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", "dkswitchmix"}], "]"}],
      "/.", "parameters"}], ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Piecewise", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"dWelfaremix", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
          RowBox[{
           RowBox[{"dWelfaremix", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
           "dkswitchmix"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Re", "[", " ", 
           RowBox[{"dWelfPure", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
          RowBox[{
           RowBox[{
            RowBox[{"dWelfaremix", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
            "dkswitchmix"}], "&&", 
           RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Null", ",", 
          RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}], "/.", 
     "parameters"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Figure1", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"%", ",", "%%", ",", " ", "%%%%", ",", "%%%"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0.7"}], "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"K", ",", "\[CapitalDelta]"}], "}"}]}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"Thick", ",", 
          RowBox[{"{", 
           RowBox[{"Thin", ",", "Dotted"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Red"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Thickness", "[", "0.0023", "]"}], ",", "Black"}], "}"}], 
          ",", "Blue", ",", 
          RowBox[{"{", 
           RowBox[{"Black", ",", "Dashed"}], "}"}]}], "}"}]}], ",", 
       RowBox[{"LabelStyle", "\[Rule]", 
        RowBox[{"Directive", "[", 
         RowBox[{"FontSize", "\[Rule]", "8"}], "]"}]}]}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"ParentDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", "\"\<Figures\>\"", "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Export", "[", 
     RowBox[{"\"\<AECTestCeKFigure1.pdf\>\"", ",", "Figure1"}], "]"}], 
    ";"}]}]}]], "Input",
 CellChangeTimes->{{3.7324216697126603`*^9, 3.73242188550366*^9}, {
   3.7324219480876603`*^9, 3.7324219577196603`*^9}, {3.7324220055826607`*^9, 
   3.73242204535966*^9}, {3.7324220865666604`*^9, 3.73242212557666*^9}, {
   3.7324222915126605`*^9, 3.7324224305126605`*^9}, {3.73242251824166*^9, 
   3.7324225184576607`*^9}, {3.7324226493036604`*^9, 
   3.7324226547946606`*^9}, {3.7324227121766605`*^9, 
   3.7324227769146605`*^9}, {3.7324229280496607`*^9, 
   3.7324230558026605`*^9}, {3.7324231474266605`*^9, 
   3.7324231575846605`*^9}, {3.7324232082096605`*^9, 
   3.7324232235536604`*^9}, {3.7324232684086604`*^9, 3.73242331779366*^9}, {
   3.7324234375376606`*^9, 3.7324234566186604`*^9}, {3.7324234948566604`*^9, 
   3.73242373479366*^9}, 3.73242377731266*^9, 3.7324240616646605`*^9, {
   3.7324268694646606`*^9, 3.7324268821376605`*^9}, {3.7324269351126604`*^9, 
   3.7324269421776605`*^9}, {3.7324269738816605`*^9, 
   3.7324269841926603`*^9}, {3.7324270256346607`*^9, 
   3.7324271079856606`*^9}, {3.7324271491926603`*^9, 
   3.7324271709936604`*^9}, {3.7324272349366603`*^9, 
   3.7324272436736603`*^9}, {3.732859961027916*^9, 3.7328599802089157`*^9}, {
   3.7403829428902473`*^9, 3.7403829832634287`*^9}, 3.740383018532222*^9, {
   3.740383100367634*^9, 3.7403831279971013`*^9}, {3.7403832746822224`*^9, 
   3.7403832776811647`*^9}, {3.7403840692111993`*^9, 
   3.7403841044849596`*^9}, {3.7403841417129693`*^9, 3.740384223066348*^9}, 
   3.7403854004902115`*^9, {3.740385434407378*^9, 3.740385473211574*^9}, {
   3.7403855346590333`*^9, 3.740385547440978*^9}, 3.740385595900853*^9, {
   3.7403857102589765`*^9, 3.740385712222232*^9}, {3.7405692025059443`*^9, 
   3.740569266675647*^9}, {3.7405693050156956`*^9, 3.740569400267113*^9}, {
   3.740570740122797*^9, 3.740570761469592*^9}, {3.740570875880023*^9, 
   3.7405709241795473`*^9}, {3.7405709565236025`*^9, 
   3.7405709569046164`*^9}, {3.740570996750641*^9, 3.740571104319865*^9}, {
   3.7405711441285896`*^9, 3.7405712354716053`*^9}, {3.7405713226501083`*^9, 
   3.740571347054044*^9}, {3.7405714009835415`*^9, 3.7405714247528353`*^9}, {
   3.740571474977426*^9, 3.740571485839364*^9}, 3.7405716592169333`*^9, {
   3.7405717161664762`*^9, 3.740571732939104*^9}, 3.740571765268052*^9, {
   3.740571822566292*^9, 3.740571834059871*^9}, {3.740572018988557*^9, 
   3.7405720325486374`*^9}, {3.740572076998917*^9, 3.740572106847378*^9}, {
   3.7405725780704765`*^9, 3.740572661471394*^9}, {3.740572737586661*^9, 
   3.740572754535761*^9}, {3.74057284530729*^9, 3.740572872726247*^9}, {
   3.740572935979556*^9, 3.740572954473765*^9}, {3.7405730757441883`*^9, 
   3.7405731441101003`*^9}, {3.740722602425486*^9, 3.7407226304039316`*^9}, 
   3.740802424745179*^9, {3.740802475116062*^9, 3.740802524850365*^9}, {
   3.740802569532193*^9, 3.7408025702931805`*^9}, 3.7408041195419025`*^9, {
   3.740804835543536*^9, 3.740804848087863*^9}, {3.740804956526248*^9, 
   3.7408049831962028`*^9}, {3.7408050442904596`*^9, 
   3.7408050693521495`*^9}, {3.740805743687337*^9, 3.740805756428215*^9}, {
   3.740809499494954*^9, 3.740809527110397*^9}, {3.740809575601382*^9, 
   3.7408095759282117`*^9}, {3.740809788802859*^9, 3.740809817283554*^9}, {
   3.7408104038462505`*^9, 3.7408104267822933`*^9}, {3.7408104668257833`*^9, 
   3.740810484149762*^9}, {3.7408105147237473`*^9, 3.7408105309127655`*^9}, {
   3.740810631399375*^9, 3.7408107180447445`*^9}, {3.7408107541768255`*^9, 
   3.7408107875816703`*^9}, {3.740810891217306*^9, 3.7408109404050875`*^9}}],

Cell[BoxData[
 GraphicsBox[{{{}, {}, 
    {Hue[0.67, 0.6, 0.6], Thickness[Large], LineBox[CompressedData["
1:eJxl1nk0VV8bB/AyNFAoip+UBo0kGVKUL1LI0DWlUIZCNIiUpLqKSoYkMhRR
lEwZ7j0UDSoyy3AH9547KFIUGjXJ7z3vWu9/717rrLM+a5+z1x6eZ++9yCfI
0Vdi0qRJr6nnv28tB289nSOdmPS/Il3n+/FpYifop5zeh2T7Ie/arxuNKZ1I
V6dvC50fCAv/BJvOjE6sfDLya1r6IZyTIQrf5HZCU3ez1CmzEEzQpAKkH3Ri
UMGDpq4Sjp/C22+39XYiWXafwSOjKHz4IRaxdbpwclkea+7fRFT6Jz7ftq4L
dR066QkBVxDJNbn71LgLKfzQiXmsK5hblXWoYGsXhmIXzxHnJ8H8uPv4KY8u
fABROX1bMq5/4/yjEdOFSj1+unV4Kqw+tzmHiLvgMEYzXnwhE4rep9e/6+9C
qXZt1sG+TIg6tNQ8hrpg2qfltd00C6FlcX1bvnfBs3fSIfHPLGQHWYf8I9uN
lkGl/Xq+2RgbrkusXdeN9Km8zog5t5A3VNMsd7kbRfd/Xb5VmYvDaduXBCZ3
Y2WbvvpeUS4MLfoi6tO78fWOTucP6Tw0Z8msPpXbDTN/U+0bznn4TNuVOPig
G4u/d7a3jebBpGrMqa6vG5t82eslFtwFL2qtMHwDC7l6y5wz3e7htk69AduE
hQh/WXLK6Xs4KNx5WceCBce8YJ5V9j1MMozEO3sWVjpNfuLUdw/LhtpvOe9j
IV/hXH5MQAFCaQf91iSyEPl+aUbs4ULIzc8f7e9nQcm2cVO9ezFMd0QJ+wap
9ptwZ3dYMUISPVvejLAQI8xU5lwtBmeySn7vTxY6yMXh/k3FuDkQs0cwg41F
M51L5QxKoF0W2Natz4Zs/65b56bch91m7aLn0Ww8z12oev1qKc6cksl4dokN
Rlfx0J7CUpQRAxdqL7Nx6NwU+pTnpVBake3zJJ2NN/enbJn4VArBDAXV6mI2
Lg0UoWlZGQ5yPseUs9g46ZicWRpZhvgAwi9HgwPz0RsG01eVY8i0JEZ2FQcs
v3GutEE5LFXuFB5fw4HYbn3lF5RDoiFlxNaIgxm6XOcsl3KEa4Qe/7WdA68U
6z2GkeXwE+tecIzgYJ/DhusxXeUwcym7I9XFQckaY9PhAxW4qXWvIYjLwTGh
YMHUYxUYl8wZ5As4aBrdlTH7TAUeVCSuLn/HwcAHvbiJxApoKwQRu/9ycE3e
76wmowJqLavrK1dwsf3n5itvxiowZlrUv5/ORXL77dkyoQw8yvtwIyyai4PG
02nDJxk4N03L6cIlLuyMShTrzzIg11H8LDeZC42yZBvHRAaWed6/Kcrnomv2
Y7v+AgZ2nC7f6dzBRfDbAelhAQNqrz/L72Vz4eLxR1Wtj4E3FroNwXwuFb+y
mqaDDByewTBI7OeidGnoTv/vDFy4wZzd/JMLrZGLJbozmSAeVrViUQ/Mh1fv
eGHExMn5P6Psl/XgwEIZ7y2mTJieXW+8W7MHfllp7EdbmGi1elhw0qAH8mcK
58bTmOjnVl8grHuwi1nBKPZlQmnssalmSA8KSXP18QQmQnXrmHNf9CBCTbtz
EpcJP/2FOUmNPfDhuLFTSSZ2rjsVN6O9B7v3e3ss6mXC2EjfR4LXA/be7llK
g0xImOfJj4z0ID2i4tOR30wkOkQH1qvykHe0eJ78PAKRTr0upgt5YLW+Enxa
QCDEZaNZzVIe9n7UyGhYTGDHrm/K5To8BASkLnReRUDNe1995lYevA8kGQyt
J1B4xGJhaAgP/tzNNQrOBDJDcmRHw3goCPa9vMWVQELo+FjAaR7UV9xvD3Ij
cOQEs80zhge9Fbsr8rwIXM/4b+HhblyZimQgAcNIjQibmzwof6S/vHKQwIpz
kX4vc3mobHF8ERxEQDVa4GBWwEOtgdQ+qxACExdTVhgyeZjTPFrECSNQlyjF
WdzMw3ffpbNOnCNQmeT1LOsVD+bZtPdTzhO4l/yoWIXNQ1B6TnrcRQJxaaFR
cr08BL4fuHk8noBjdr/O7+88dPzr+bP7GgHx/bq4zkV8uKmX0cvvEugYlvqo
u5yP2vagyen3CNRqbbFN0eLjrDahdqyQQE5h/QxXQz6qme6GivcJ+Nx9mSCw
pf5fws4RM6n2304Z2eTIh6j61tWISgKbNSzts135UGmJt5V7QEDjdoOcjw8f
j7PK1qjUEBjIakx8F8ZHGKvJ8UktAY5g2ier03wcn7x16aznBBrmWdMKz/ER
SLcddntBjS+jSeFQAh/JCq6h3fUE0numB7df5WPGErqJRAOBS8rbOtek82GV
EK60opFA4LXmpC+3+eB8//NrZzMBN5bMF6d7fOydE620r4WAjaKNI1HCh06P
iObXSkArqWX2iQd8/NtLWtDaCQzHtyb/beOj8EdReXUnAVHLjG97uvn4siYn
hN5FoF3Gzrm2h48P71MijbsJ3I9pU4rqo74n69IzWARuNsw81v+ej4+f0kqM
2QQSp9izt4zwkWB1Q4NN+Uh0+7Vpv/jwnK5vP8Ih4PVCbixggo+V2ZA9zCXg
ILF9R4skCW++P95SNjdLrNSaToI4KBx16iGgG/lq7mU5EpsHWhdVU178VD5s
VJGEfvUevjKPgOLEdi7tHxLzLKoWHKIstemKYcUCErTGsa8PKX+L6EhT1CAR
enqD5wTl/mqFn6ErSXBj03yN+ATYv2g7OdokjsovnXGY8sv1SQ8M9UncX/7F
NYNyZVinSsYGEv4fZOwfUb5bOSv8twmJwyfCvnIop3134LlbkFj01dhukHKM
/tUNj62p/sXu9PpK+cTRrowF20kkRDSt/U55f8Xs33RnEiPKF1+OUN712dHt
9S6q/uX5Jb2Ut+kkV5t7krg4rdKuibJRULdq3j4SX89IbSukvOq+YoR0IIns
oV3zoyirDjuRfkEkfPVutDpRltFKMW4MJTHzQIGHGuU/gawbK0+SkO/w7hJQ
43detztJm05C72O82XXKxZMHLuhFk/CzTiiiUZZuO3xq/SUS6pPtlCZR3pP+
I3jTZRK7nRj0e9T8V+2N9DdPJmGWn/fZmrLCmum7LdNJ7EqUONxPrd+zelUr
h9skZm07dU2KsmpS7qYd+SQWaNtZxVLrH+KhpedeTKK4/ZvSdMoaXzct8K0k
sbdKUfYLFU+nn7xUDKyh6ttWbvSgzLm0fXpQLTVfps6pT6n4u7jQ+9uJZhJI
lWYHU/HZ+2Fw8PQrEjaOc57VUvG7vipEfI5Fglxi83Ya5SG76OZ4EbVefWpv
o18RsIvIz8n5QuJh5KFVWlQ+3N2qk3rnB4mKWDa2UPkyMethXOE4iWq2dJEr
lU9l95qPM6cI4DawO2k/lW+KnGHbRlUB7laUSRrXETh467h5m7oAwr9rV6tT
+Vt38F/DLg0Bjjkdaxp/RuC45KwlAm0Bpsy8vD/vKQGejv6vUXMBnEXxeXeq
qfgefzTyzVIAlTtEg8tDArENW/p/2QogFzUW/m8VgY17XF9JugqwZrAmAwSB
7LiTd5QPCODBLFx+tJTAzx2SN9SOCBA77Y/GpxICtMXxVxYdE4CxUbXNr5iA
xMOsCE26AJ4uIZpmBQR8B2odkCzAcoUn9MLbBDTNpk741QjgXZp5wjGFGm9h
0fKeWgHkD2QcNb9KQF+J5mD9UoDi30YbNa9Q/XmXnqfZKUCk8z+W7+II2Ces
svk0IECCqm3V9ChqfXl26eGzhfiWcDvtD7Xfj5l/eTakLET2xyq3k4cIRBSn
fnCfL0RC5mOtL9R5EU0Xm5isEGL+sXMz23wJpC4NfithIkTOg3wdHXcCD4NT
dOMDhNjgHhxQakHAhFzv8fewEGfOVH6pNSPw3EJ4/nCoECW/jZpaTAg0Ky/j
0ehCOAeuPdRGnW+Cx1X0OdeEuB0a9TtSi8AkGbL1Zq0QNds0gopnE7C8vci/
XFkEq8CbLtp8JvTT5Za9VBPBclmKXxmHiYWX//TzF4kw9+In6dXdTPwOZ/tI
aYnglbb0z5xWJkocLu1xNRUhdeMsufzHTChO/uzyd78IavaWFo3ZTIg9ay2s
q0X4lukopepF3R9cSiT3PBVh14+Z6766M/HA5vrzkDoRGG2jtg2uTFw1DDXN
bBfhe8lFfa/tTGyRX7Fx9I0IW0vs9FxMmCh6kqh3TVaMNMkOTft5TITN91z8
2kMMz7LQ1IROBnxoOjsE3mIwrWLce1sZsI+aHMv1EyP5gvV57UbqPjWY+7nt
iBh3E7jyj58wwGK+r62OFmPqwn7kFjGgYxvimVIsxqsn2n+vRVP3K/rm5MRy
MQqUTqnk0BmYWqHUEFspRrRQWHOHur+JlKu0z9aKYf/uYm7uEQbi+/78PcQS
I66qSTfQg4ETc9vWBvDEqJml0kJzZWCv9U3ffSIxPEYLxnUdGTAqNW1zey9G
hMFc/SFLBt6fPJ9pOS6GJmv9Gg09BoZ2aO6/NakXBXRW67vVDHh9UpRQl+yF
pUeCUv4KBrU/jN/IlO7FowcnpvksYcBmyVsD1Wm9eJ1WWKiygIHaR22v0mR6
QZQZ/G1W+X//B0KfFyM=
      "]], LineBox[CompressedData["
1:eJwV0nc4lu0bB3BKZiEqL2lR/YwnEqUUXzMrhJJIvNJ6NVSk5dUwUlKJhoaV
NJTKrOyR8TzPHUqR9ez7jjISMvvd7x/XcR2f4ziP73Wex3Uu8T/stnuamJhY
PX3+u7P6Hky/ocBBhm972xWnHGjERN9XVOKgfsAqPyo8B7c1gozj5nDwd4X/
PINXOZAv8myUU+FghkC++QovB6O92jOk1DkQc3pV8rd1Lhq2sA5MLuOAL2x9
ESORh429uZKntWgrDcd0GOahKPp+ym8dDgJa9WS7/fOQ+fbQp0F9DkIPinfp
l+Xh38WzN3Sv42DmpHTo+dB8ML5vlfvixMHoW+NVX1oLULhlU+mlzRwUhFve
fy5dCKtiy2Nm7hyYvt5uu8G4EF5x+m0Znhxobvy9JvJGIWJWyjwL3sXBw7Bv
Qy12byAKLnJQOslB59jjR2qZb5EyqXHJ6SEHxHyP3kVrisHYo2omnknPI7w1
ZOBTjAJC4WfuEw5eXOi6JR9RDCJ5Yrt6NgdPl7uFajcWY9Lis3bPGw6SxuSb
BvaVwCsqpu7iBw70AlYQ2ldLoazQL101xkH44JDzwfYyNBVfiraf5CCia81a
sqcM8QeWSX74w8HxGTLSLuNlUKr3mv5VgotnUn+3UKrlUIqsnuyT50JOf3uC
nUc5FMeTfs7X5OKHh7hRE7McM0mb9mOOXOwp1nnDeloBViLHa9SJCxup3Q4m
hRWItT7d+u9mLgo6pubfqa6AXNrLzzFbuchpffNVh1MBWZ/5jcm+XCjWuxim
zqmE9Mf+auYxLhKfnZX/fqoSEqV3szXvcdHrIjgTZVqFrxus7boecOGnLH0d
DlXIfvudk5TKhcV+yXXdHlXwyjdVUsrkIpBRmTQnqAqvnncFi73m4rL0naHS
1CrsvKdp0lHDhWPLrR/np1Wj8OSzqpuD9HssexHeViNuxN3HbZiL2D9Kda7V
1dgVMjE0a5SLq9OT7m5rqIb8Eaf/RU5x4Rwh5QpRNXbv64s5JsPDbrGh4rOz
30Npm6HL5kU8zGxoWNu6+z0Cjd61yjjyMJEKXVvJGpQ1NGcVOvGQaftArUah
BnMP9ofv3cwD9ahxualqDUozli2v3spDg/vtajlGDZRVrh0968fDtZ89e4xc
a/BuNEBuJIQHG+diq+I7NZArlTcVpPCgMrvg6qhmLfy8tRVvpPNwzIlZ7Mao
Rd6IFd/iEQ/afTl+6Ua18F15Mib5GQ/lqit0dW1qkZPKb/bK56E1z/1r8+5a
eEcUHmpk8tDzpOVJckYtntn7p5QM89BtlmpiuagORowlZhjlwUlnt/SC5XUo
kee0lY7zoHf87LYBRh0aPvqolIvx8f0IPz7KpA6/fLbHVcryQY54MwK21sHs
6OYztQv5EA5ZbBiIoeuTzDybNvLB+iqRdLq3DtvDJofc7Png5Ieqxv+qA8+3
6MZHRz7KbLqa0sbovKUmHz5t5iPjZbR0jmQ9VLNXb/zixYe9VYTi1YX18K9k
GLUf4uPXSxlJE6d6DPWoKYpu8iG1z/VN2KN6JNwna+7d4WPiUWve9qx6GLrk
hrvfo/v5mPNA/3U9jrx26itL5UPerdexrrgeP06cJe5m8dHbmf0y91M9hDNE
sa4VfJhLngkMEmeiedErmeIffGy7V+mX4sFEcGNY+bF+Ps5aN9tUeTOhfMHh
pM4gH66aUcU8PyZcRXzq1m8+PseXhyoEMsHOmld7dLoAn4Y07mqFM1G97kyU
lqoA/5w9leHziIk8d9vpCdYC6Fc4NQ30M3HRsTBS3VYAG9OFAUuHmNhhpS2d
YS+A4H9ReW6jTEwzlJuV7yxA8R+zh2niLDgrfZjX4inAk9qgmYpKLFANHjrq
BwWY2ePzSXMVC2rOe1wfJgqQRyVQ1odZ+GHz5SPjNp0vdyxi6CgLZaZ2HnlJ
ArTsVbZMO87CnhU63u+TBVD2nVjRH8ZCzszeAOqJABWn9qvsjGVhEzPkBKNE
gLZkzwcRj1kIt4tMzhUJ0Bgxvkmhk4Wmnft2rPwmwM9zuXrruCwsDXFUzeoR
AN+rn/oKWKhPnX0jvV+AVbFOp9O6WZgzfj8qfkwAo16q5M8wC4+f5x8Mkhfi
a5Fdg5oCGw1K1HrGGiF+rk9P421gQ0Ob+TtzrRAJz2N1H4KNELzI01wvhMEd
m0R/SzbUDgTrzzcXYvGgv/JnWzYCqsU0ZR2EeLwicvCWGxu/Q1VlKR8hjtSl
SMbsZWNJh0NLeqQQfI1lDL2rbFyqWJ+99aIQam+37Kq8zsbPTEaU1GUhDvzs
X7M1gY2Ko/JGgdeEuJNfWnToDp0v3XR11V0hCgp2XTiZzsZjw+225S+FCJ95
cqwvnw29S3vzO9uEyGrXkAxqY+PmYc8r1zqFSPm+VuN+Bxt/ttgHWHKFyCTJ
xTVd9LyLdJUeiYRYrbiRmC1g40he78GDA0L0HpbWOP+djVxOyLIJSRGC/jgf
bphgw8Q4IkF1lQg9Jf/YG8wn8Nlfdc19IxGuS/BKutQJHIt78WWxsQiaGYq5
lxcSyBK2qGltECFdOUyzfQmBhQkrUtdsFMG98gl8tQhMG/j83N1LBHvP1ld9
RgSYT7VrrpwX4f7gZT+rTQT2fS7ZNztShNYp2fiHTgQkpm2RTYym8wZ1gqa7
EDDb/q/TvVgRpvzvGr91JfBS6uPHpzdF+KO0+K+Z2wgkBJzh1DwVocxtuZXl
3wR2LPwwKv5RhCublywVDyYgr3o0712zCN8+dg4YhBAoV557JKRFhOiFFwz9
jhNYLuNNUR0iFOUn/pV3gkDfoOjzB0oElRD9BPMwAufrpnLuT4nAeGyR3BVJ
wKgq9fA2cRISk6t9qSgCZIm17mwJEt/fEE97owlsyr2UFiFDoq06u3swhsDc
5HnXA+eQsK0yWc29QuBxsN6hdTokBC1lBnaJBLwON2oPMkgMnzby0LlJYNY/
wcIsfRJzymrUZW8ROOr7dsfi1SQWza9IrLhNYL3DRkcpcxL8/JEdKvcIEIt2
ajVvJWE40/CAaxqBs2rigjhPEjqsX+7y6QQM5z5MtvMm8fXJssFa2rdlu+cV
+ZG48EjcxziDgP9QyIz0QBKHI1KmjWYSGKq/wgs6R6J/R/crxecE2uWa901c
ILF/d8GdZNoVm9T7oqNIhP7yTWS8IHCNeDr+4DKJ8wusWebZBHSaauawE+n6
4ZVb3F4RUFRWuOt5m8T4eMFwI+0Rd48lgiQSd9Kk8lxeE6hqFqwYTyYxQ+7b
RZscAjtbxW21n5IQWQkeq+URsFazZ+dmkZC/KrS+TFvX+5q7eTaJhoIDEmO0
f7cv9NuWS2JkZ8dAYz6BeM76k5ElJBz6P6UEFhJ4T4Y84zaRWBu7contO3pf
tYoNDjaT2JcauyeJ9o39EoW/v5DQPOjb2UPbrye+SqGDBKU+a39MEYGx3uwO
U5JEdW3n9OxiAhz9kV1130hMWTkOD9KuCTLr3vKdxPFvARrGJfQ+/mQNBw6Q
yNykp1tIW3/4m0LSOAkL6TaVjFIC84wNbi6bIqEoF9rfRnsi9IT6KzEKC/5l
ycwuI1A/KqldO4OCV9KCacdpvzRxznaXphCX/ImXQfvW6cTVXbIUXIh3Up9o
B0xqWg4rUEDQpSW65QQczAJrzylRkDHW+msLbYPw186z5lJ4+MHf4zTtKTEL
76VqFCzs5jyvoi2wuMjNVqcgHr2hRkSbef7D3vWLKCh6BDCkKuh9kdgZ7LaU
guRj+TZL2lO7VFY3Lqfgan4k1Yd2QGXDkIs2haKlU++P067XuJRP6FKYbAzb
FEd75XmrUCc9Cn1rClc9pH2TO2HMWknhYl7wqULaE+b5vx0MKchqnlrKpO2f
cvhN3WoKdbVxBu20a/9onbJbSyEq4ERaD209X55JjQkFUmsidJR2QsndcRtT
Cvolna9nVNL/tWBrURUopFkK3BVp+4XJh1lZUuh2aPBWpf2+vca0wppCI283
czFtxoZzU+a2FDKu7E1fTjv+rklpqT2FFxtvCXRoj4wNhpttovs5l391Be0d
Xs/Ni50p5OtGZejRfq5Vp7jAhQKn3C7rP/8fWrx83A==
      "]]}, 
    {Hue[0.9060679774997897, 0.6, 0.6], Thickness[Tiny], Dashing[{0, Small}], 
     LineBox[{{2.040816326530612*^-8, 0.6}, {0.009814340804846833, 0.6}, {
      0.0196286612015304, 0.6}, {0.040908357085458646`, 0.6}, {
      0.06077788357015209, 0.6}, {0.08025764881887605, 0.6}, {
      0.10138846915816112`, 0.6}, {0.12110912009821138`, 0.6}, {
      0.1424808261288228, 0.6}, {0.14510356922815304`, 0.6}, {
      0.14772631232748326`, 0.6}, {0.14805415521489956`, 0.6}, {
      0.14819523628526837`, 0.6}}], LineBox[CompressedData["
1:eJwtjn0s1HEAh29Rrpi7pkSlJjJvYS4q4XNoIl02acMsb0teOnqTlI0tWl7S
y46FjEoKS6+qxVz5nrspztvlcMfd/X5XljuyFeUl0tazPXv+fazj08NOrGIw
GE4r/is7L7h6xoSAVcSXh7rS8BplNTeYEYjLyXivM42oAN5I0jaCrADqRp89
jUv1hct2DgSuk4y9/bY03mWsPvTAl6CU63ttYCuNEYV/elwwAW8i2k1mQWPe
L1ewPZxgjeDykGwDjf2mC2OVyQSnxt/aD5rQaK2bPicQEASUcDqHFikoTVzK
w6oJfu0JOzP8m8Li2dQ2dgNBg+a05chPCj74yrwuJNjs0ZSs0FNokyuq8icI
9Ar7dWNKCkKmRHKBK0Kpw7YQupVCe0rVlki9CDoRs3sym8LLb6mpx2dFWPji
6c3JolCb5NWSwOgA2+hE48UMCvmJ8qi0DR3YF/yhwCCNQlD8+oor3h0o7M4K
tIyh0BOZb9FU3AGXwQnhAb+V3yD+RoNdYpwb73pRuZrCjJ0P6wlfgj9rb90J
LtFg1Vwje8vOj1Ab/3x9pUgNz+XY10ebumD9KdldxVGhK2+3VOzYAyIO5eyN
GkV7FNcmQNsLR1FCYOdJBbbf1M3VT/Vier9umBehgO6XauyzWz/Esf5MycVh
1E60fDQtGYDH8hHl4mk5TK0efddqZVB/Eepfnv2M4uTmxBrbQdhn6/OkZQOY
5TZqk3LkMCyWtj+83Yfz7qJX5mQI2rIh9oe4HlSU/2MY4UxzOze6C6omUVGf
9Qgs1+aMP+V9wkKKrNLhkgLvjac87x2WwMnPaCmxRYlyvqw08ibBwfvWJ59v
GoNXfkiuuZEQmVYxOzTRKjyeVP4wynwDZ/0xYzlPDWbmcsSSyTOYsaaZonk1
zKTf66UGNTAUVj61uatBQR210G0cC8HGxau6Og0Y//kLyN5gAg==
      "]]}, 
    {RGBColor[1, 0, 0], Thickness[Large], LineBox[CompressedData["
1:eJwBQQK+/SFib1JlAgAAACMAAAACAAAASmXo0cDpVT5yP+sWhevRPwRDGnDf
GTQ/S24nI7vp0T8zn5icsxlEPyadYy/x59E/S83Xsp0ZVD/Z+ttHXeTRP1dk
972SGWQ/QLbMeDXd0T/dL4dDjRl0Pw4trtrlztE/oBVPhooZhD+qGnGeRrLR
P4EIsyeJGZQ/4/X2JQh50T9YWaGv8PGkP8GgwOXp/NA/C/+BXEcerz+CSb1F
BYnQPyVR7ujDi7Q//+zFoGYX0D93zjk/mPS5P9QJGVlNOM8/F7QR3gEBvz9w
NQyxQFLOP7biQ8zPPMI/50l7avFYzT/Cap0bWezEP9dTAhouZMw/9SY9D61t
xz+MWe8J3n/LPwL5qxAbJco/HUhYW0uIyj82/2C2U67MP3IyJ+0rock/zIQ0
zsYqzz9AEg51mL7IPzoPywKRNc8/Yp2zHMG6yD+omWE3W0DPP4UoWcTptsg/
g66OoO9Vzz/KPqQTO6/IPzrY6HIYgc8/VWs6st2fyD+oK50XatfPP2rEZu8i
gcg/QumCsAZC0D+Vdr9prUPIP3kuzsprR9A/uAFlEdY/yD+wcxnl0EzQP9qM
Crn+O8g/Hv6vGZtX0D8fo1UIUDTIP/kS3YIvbdA/qs/rpvIkyD+wPDdVWJjQ
P8AoGOQ3Bsg/54GCb72d0D/is72LYALIPx7HzYkio9A/BT9jM4n+xz+MUWS+
7K3QP0pVroLa9sc/aGaRJ4HD0D/UgUQhfefHPwGPFqsJ39A/8LqRluLTxz+u
PxUO
      "]], LineBox[CompressedData["
1:eJwV1nc81d8fB3BS30RJFA1ENMlKg8pLpSLZDWkQJWSUVEpSkSgl0U4ZSURS
WlRU+Nxbxp0fXOuuZERWSlG/87v/3Mfz8Xnc8z7nPc796HgFu+wdJSMjYyIr
I/P/75mXO4eyu1m4WRfQ0cqg8G53ZPbTfhbenw/qOVFOYdci1W3Fv1jIj3aN
1f1A4Q5t8apyFBv71/Fi04opTNU8f+S7GhtSW4N37vkUXnZrzvk1g40XBryV
wbkUtpQW8GV02CjePSXlSjaFq971Zir6bPzrjzEZc5+CSs68fjOwMerLP4/k
mxQKwt+kr7Rmw03xWPT06xSc7J1c1tmyMdXplcLjZAoJPUcLtrqywXXxujCc
QGH8Uir4+D42Hh65kmN6jsIj+e0zowLYiJgRMXvmWQobBN3VFw6yETxAPVGP
ohAboWaYEs7GXcuo7QaRFMaU7f1WksBGQF8s3XKUwv2rQ7cZyeT5H/PMeUco
WO+7aMe+yYZQsdLtRCiFMwrPc8QZbHxUFIrXHKTw12m035hXbIwfv7bScT+F
lFk3piq9JeuNEo795kdhxYA+Q+0DG18M/DWv+FIIv+46d14lG+4VJ7f92Uvh
V1P6lw1CNqZdLv1ouZvC9fwlV12/sPH6QfWxOZ4Ulpz+ZL2jg42GBX+mq3tQ
OKzXlxE4wEacQdVjlZ0UJg+edT0yxMbv3GB/zR0UCqlpcpF/2VjlNzfDeDuF
Pv9VXpflOfBcWKFzYBuFxBX8STcncKCVELXojhsFYyW/92kqHNz99m8bayuF
oILL2s80OCj6d/WU0xYKE6L0WMU6HLC1jB3vbKaQu+lVZNkcDs5vPlfzfROF
zp8tzXxjDtr/Ss/muVJ4sS/hw4YlHEwMGdigSHyq1vJByXIOjkcXZB90oWC3
vjvObBUHdMyCs0JnCmovUwKz13HgOJtbupVYNMfeWWsjBzqPzljVOpF414bN
kpw5+OIY0raLePWR7cMndnAQEUWviXEk+2tVEPbu5mDr1hvvZxPXbS766LOP
g9I8k+FKBwoZ5X5ZDQHEM/Pqw4mDFk+74BTCwd83gVamxOaZjKDyo+T3Vxeq
99hTGD0lzMUigoNK22Hr58Q10XOX5J/hYH/myoLTxLcG6Gl6sRxYr3y4ZjPx
3j0xIzcucpCvbi01IjbmLRZNSOIgw90vfBLxnzVfys7c4CBLpqR3aCOFimfJ
D3+mcHAn2dy4nThR1zo+IIND5mGadgvxjqT+YNFDDlzVv+U0EM+Ry3Dd8piD
yaKzRc3EvSEuSz8/42BN3xjzNuI3YtkZVq85cD7LUf5FHONS8LfwHQfGDjcM
lEh85w+e4vll5PyetkcXEGuYKlfcZXLQNkOjcSPx17SSbNUasv/p59cdJn46
KfhiLI+sv8AxPYM44rTWwZF6ki9r34ZaYpveqk0hLRyUXVFpnkTyp7o7YtlX
KQc1gZ+uORM3sww0dnRwcDtgQ9814myrxn+s7xysOHC+SUQc+uSCZO0PDmxf
vltrSuoF7eVU0W8OXH5smRpLrHC5I8dIhoukoJHVEuJ7wbYh0xS5iC1a6ZZN
6u/f8mvzJWUuVDRtZ04m/WLm+NBcTo2LB4bWP6OIPxmOle3S5mJI0eZqCOm3
wa6yhNIlXNQWMp7FkX59vzP00OIVXFyYp6I/g/RzfJXu1pxVXMyXVzIqIJ6V
d0YreSMXR0uf3u0g/W8fYJW3z4uLqfsmhiSS+Zna+P1y4z4upO8G0te6UxDb
3Qt1DuRCq8evbYQ4TP/v8uVhXLiYW4UdJ/N4v6P4k9IlLrxlDs5NJ/MbdN1R
1z+Ji34unXiQzPdSa0l4+Q0ufGWrT1uT+f+UorDwRAYXcmEn3w94kXo7bUto
f8XFak73gQgfCpYvB13LJFxsoQ1jZgdRkN9zPndmOxfXdfdy5wZT4ChrjQnv
5iKz53CvwQHSn/5rX5gMcdGVteQoQsh5NZOn3lPiQZ/iX44m91t9lEnTMXMe
nvP7rsSQ+zDduHwx35KH+ya33AtOUQhocrtkbM1D3b7b25tPU5BZegpfHXiY
cdvqq2U06c+O6rRNe3iwHwXzaXGkvk4BPkYJPDi1pj7VT6KgpJn1XSrlQROn
E5MeUrDaEtUkaech1b/seDP5PwhJ8Pgs7uZh3n/FMQseUaBlp2YJf/EgE/Kx
rzyPwt3W2F2N4/lIEXcmjntGwfCJfxXXjI/k/esYJW9JfdYYPvoQzccD1VoT
Jpecz++5T6oeja0sZnqYLAODVo+kvpG1uB3dGMPby0CoaVmh2sc6OB9S8Gl+
y4CPmXZqIqMOU6ODk9aXMOC25MSF8dV1GJ9zZSi/lIHlFmZeo+rrQC1v3X/y
IwOjVt+f2N1dB9+5cysnMRlIcI72L59ej1Madvcm8RjIOWCtHRpSD/2O88uD
2xm4E5Kq+P1oPUSRjLy3HQxcDB0e9Iuoxz+JxwrFbwwcCCus8oitB92S/yij
m4FbN///qYfyht0h+X0MLD2lF253tx4/TWrfMfsZKEsYTc/6VI/L/YZaHSMM
tDwuu8DWEWDnsIbn0UlMsLpGfzOdK4Ce446EdBUmSg3Wbkw2ECAr1JZVqcpE
ak75+K1LBZAfsj+rpcaE14OKi40bBchON89/MZ2J1hRGwtejAqg6WKS91mWC
bpTvsYkQQC5hxQu+HhPUDFunnDMC/Jg0je6ZzcTDm0zlwIsCnOQ3munNY8L/
6qfEvnQBwutX7Ik0YMKdp9Dn+lCAGSuflyctZMJO1c7leZ4AvsU6RlmGTBgk
flYJeyWAp+GJqZ+NmdBgKR6qfytAb1XJ9QYTJsZP3Mi1+CgAVZeu2WnKxLB9
/KI7DAEMjbnZQ4uY6IqvTBqpEoDb9m/52MVMNH8eP7CLK0DH+nqu6hImqhXs
N5XWkeeFWhzHNUy8s71YqNMsgKlwndv0bUw8jq2aHCURYPPj/Ru5QUzcpSYc
lrYJMK5Vqfh4NBMJ/znw13YLsGhX1hPlW0wciK6+Kj9E8rl5u5d8ORMD4azr
qnoNiOita1oc9Al//Hm35x9vQE/XgE7fs8/YtGRnomFkA37OKHIIqviMXNnW
mEXRDVj/65RPY91n7Lrx8+DKSw04J7oefmnkM96XT7dxTm9AN59rbreuEue0
dw+EfWpAwjubJkN+JVTpro2M6Y1gzQkYbGirgv6qsX99ihtR2R/tmtpegyc5
j+bWlTZCvEjdfdbvGphNdnK2rWiE8fx/2nZjWFjx9cZ9fTZxtbgrewoLDhcX
2PW0NiLc/cY91SUshNTb3zim0gTq/tPDtw+z8Ppgsmm8XxOyF1wtuvOdhfXp
OvsK1JvRNMfE1I3FhtkNpTkVGs1ImfJxQizNhvalP1KBTjMsJvoWPG0k7yXH
+F6jDZqR+ytu5682NvKc43ZttWpGo7Ji2lpZDlRlezeP+DbDvzI3voO8R7R4
lFrbFjXD6IvDmkPxHBzV9Jgl2tECm0D+gO5iLrycjLc07m5B3fut+0ZbcOEQ
JXu+1qcF8bzrsUJLLua0Z/RWHWgB+4O36IINF7zCttKi6Ba88tpgmr+dC+ON
IR7JuS0o7z0cseA0F23Hz95ZP9wCTrRK9WgmFx1b9H3TZIRIM3ne6FHFhWeP
6qiZckIsXlb79QWbCzvdL4unywvRnvBj2E3Axay4cynKKkLMLOJ4B3ZywdpU
GTAyWwipYuL8+vE8GHzbrFhrL8RAXlFk5UYeXm3aWHLeSYhnk+8d/+fEw5q3
qw9ZugrBWfhhkuFmHtwvGTVkugmhkt098+ROHuKMxz0K9RZCNjV/XEcgD62h
bzaoHBNCxn/Tif6L5B4dmXXe/r4QinRFQ8snEs9nmqVslhC1a31zLlTz8LJ6
Yl9hthBRCh/2L+LwUH1veJtGvhAliYrsI/U8jKyi53e+FiLl2rugqq8kfkwc
M7aGnLdpy7I3cnyoTuyRL/sthMOXgqqCZXxw3p4/ZzsihJFr5pWc5XxcCZj9
X80/Ia7uyFNLteRD5ZO7nGC0CM8i+r1PWxOfLR/5riSCQ1frBk0nPpT/3Oqb
oSvCVbM2uTc+fIz/urbxkJ0I7AhmSXoiH5VXhe5D9iJIteebLk3mI946vP6k
kwjLVmWmMa7xoZj+hI7bLMIgFR4pvs2Hws4Z7HseIoRc1Nvfl8mHPLen/PMh
EWgdRkb0az5Gl9zO170jgmfIzuORzXwIVljbtNwVoWmX5q1WIR/5Rd+Et9JE
MDDef3iDhA/3FytVVLJEUOOX7pNv46MgryVU5ilZjxd9fGcvH7vu6Fo0USKI
X0Q7BMnReHXsUdm1fhFY0+XnWcymcemn606XQRGcUmvlV86l4X14+MeEIRL/
fWbnivk0lA7azz37VwSN+PKSRQtp7PX9HndonBjG2WeaRsxoqGxd5Og0U4yy
mJ8VY6xp7Dcrrh9nJ4bSLF9BnweNUhY/95W9GH61mZuu7KYxJbAncp+TGJxV
bgZG3jRKMmfPKd8shsPyR388fWioql8OOeUpxsBspkNmAI3ioT2KPw+T9a0e
+j0No6FYorRSmipG2ISoTZ2XaHhun6+clCFGeubAZIvLNJ7/XCNZ9UCMj6rR
gTGJNDyMj8XdeySGRY1Ct3oyjWdpEr77CzHC/ynt0rpJY3v0qyD2ZzFeBy49
XZRO45GtV+q7QTEMblwXLC+kYWagY4khMex08o8ZPafxTknYUPJHDPZ/EcY6
L2iwuDvV38tI8M47qePvSxoDO7dd+qggwT2q/XlGMQ3LEKcTDC0JcsY8ZyV9
oEFtmjjdVkcCQ++BOL+PNJyWVr9k6krgQvUHryyj4TVs1/9pngQbVd2olnIa
52LW+1eZShC3PJ9SYpJ4tyzdOOsk8NbL0FevobEtYuSHi60E6u0KG1jEYo83
SVw7CQbXR2SfY5H96FnU8JwkcLU5btzLpjEtf/G6WncJshLCTufzSLyPBmaN
QRJofTddLain0ZnZyd5xUALPPS2jwwQ0QmNzgpsOSdBtoKsxuYHsx37eo+Yw
Em+mhf36Rhq5tbqzRGck+L32n+BmM40fndOVW69JYGS5LK9HTCM55St156YE
y7Z0OUdKaCxyLIx0vSOBFWWuNl5K4+BT+++laRIc+B0qp/2FRlfYqerbuRJU
abrcNPlKI36BfYxLvgSFwaneBcT6jdMsxz2VQG32vG1GbTT88CzvyEsJilxS
P89up/FlTGu88wcJKlv0B4c7aES/fGotXy7BcWrV6qBOGrp+kcPvKHIevb6y
JuLdlVMDDKokmOT1/tDLbzSartjZja2TYNjf4O7mbhr8mQXj3nZJMDTm+XbL
XpIPdsT7Qz0S7NNueZlErBq14diCfglM4h94fiV2bpW0Xf8lQXZIUEpcH42q
XDVGiJwUdRrm7a/7aQTskkTO/0+KJ4qFNbIDpJ+VnywVykvBiTg4wYbY9pBt
lr2SFB36HUk1xOXmJ2LmTZMiZ5dn76cfNPZ02li2zJAifqHfizGDNORSpgxe
1ZLC2EmtyZJ4lUz+Xjk9KfJ8Tm7KJRYWhGsWzZFiqLciS0gc6W3DPzBfilxR
9W7VnzTeVoismw2lcKcXTgwl3hH2eDjZRIrHjxXGpBP/mR9eaGcmRdqjpz7V
xOYXJ+u9Npfid7J3yKxfZN5c18slW0sx6bBW9UviWLtXZzXWS8FyvaFeS7xj
zXz5TFsp9jr6jvtBPGqR4oQXDlIoO4/tMBgi+V1wIsHSWQppBVuwjvjhrK5J
lKsUNoZtRz2IHVRq1OrcpHBjdRTFE+soWN303C6F8GylVxrxgGzBjPadUsxn
SosKiRlDOncPekrRMLCwrIL4du8V7d9eUoQO3o2sJQ5ql8s4s1eKmHNG3a3E
q0WhsxV9SX4m1Sn/IJ5S/yUryV8KRtGFNtnfNNpYWxZoBJJ4I6uOTCAuZlC5
94OlsBrpKlInvlS6zGhhiBRKCdEvtYl3v8oueB4qRdS3XwHziM2eTDezPCrF
V/7KRkPisQ8vvKg4JoXK3jX/mREL7g0vczwhxWeX4c6lxI+vBxbXnpTC/sS2
SxbEpxOaV3qelmLpWZvu5cQsdblvZWdIvV+XzllB/D8ba9il
      "]]}, 
    {GrayLevel[0], Thickness[0.0023], LineBox[CompressedData["
1:eJxTTMoPSmViYGCQAWIQ7ZX64uKBl6F2xmDw2H6BqH9bl2SLPYzfyLFZvVNy
CpwfEblw/YePS+B87v+NMe5y6+F81cB3Lw53b4Hzy89Z2s/4shPOF98ieI+R
cT+cv+2R85nzNofg/ENZc6Uj3xyB87+q2fKvzT0O5zP9XC0grXoKzjf7n7At
eN0ZOP9Mi8m5Y1rn4Xz5Ca9/rnx3Ac5//f3+vasGl+D8Ja92n+Lruwzn88ku
f//kyRU4vydza9oClWtw/jeH1U8y6q/D+SVGR7aIHb4B5/cHtmQdlboJ568q
cFEoKULwe0v+fMusRfALKracje9A8JOqBHbe6kXwQ2pyloRORvBvns1XTJiC
4AMAM5W23Q==
      "]], LineBox[CompressedData["
1:eJwVzX8wlAkYB/DFNrlIRxdyKI6xISd1dDT3jamoVrV7ur27hCi0OlJJ3XR7
S21S3DK0rvOjjTRSoWnXKRt75fqxoyFbeLf1Wu9ufrVrr7n2lIvuvT+eeeYz
3+c7j1dyFnefNYPBiKLn/71r331HdQ0BbqxnriRYD1a+MPVBHQFjR2e3e5Ae
bqe0nMirBP6+68hLDNBjrqCcFSYjYKWQZxh89egSM/u9VQQ822bLp9z0aC1N
+qO6h4Dv79uXrXLVo6FMcd31OYHA1ktXDy/R41zFkZMOOgLhso0dbxfpwb1o
CJ6xEOC1FI9Zz9NjuKnr3FMvDUoaPMJdzBR6TUxjiJ8GroWzhalGCsrAjezy
QA2k+4cI+QQFaeOf9rwwDVr8q4/HGSgkX3lQrGVr0HPd/XYpQWG0+pF4LFeD
hTc/XWvfRcFU1F02+0SDs7eXhlpdoPAv/1nlih9fIF+1JORVFIWAyPlzqe1a
8BPfC9m1I4iu9Uq76UJCG5TF9nujQ65HovdI/DA2ZPdmijk6BBp32g3E6tDg
FzfB2TuMxYv+su2a0UEzsmwqdwEJZmdl82dVI3ib90ja9lCLjDXtxEdbKfhX
FLKN+1/g2uZkacc/FBoPRHTmO2lgeeX28ahED2eWanh13yDkX0fblG8wQPJt
9ruBowP4OUZ0UTZqgHWWRSkJ6YfX0JbBOtFLdGzkb2978wzhYafKl4aMoqh0
ur+7Uo14z553VupRxNzfY//+uz5YVMXUwbwxOPMN4Z6zvfiVmXCE6zMOqakg
qDWzB4tJea111zhkBawci7kb837Ki/syewJGu5kbbhEqMK4mNFNOk2DEi6Jy
ZA9x6LfmYqd7k1griXwsn+7C3YAzto6Zr2DPGR5qj74Hxy2HAvMdjDjW/EPV
1LlOaFf2qo8rjFheKtizyv0OWmrgY0gwQbjAhiRt5djdHOroMWeCq2jLUZdF
LRCKLuVpG6fAaBh7Gcatx41xj0oHthlJk1FVgQIJzlSLkshtZjC2s82rfSTY
yzX5NnHMEN7aGRWhOg93haIllkf7RPr4ZufzOCve9aAo2Qylwy9r0prKkB56
4fWC43R/NdF9iSyB96lPYuZfoe+nyZmVgtOYW3ti4UADbeVr6TqVCIRJ33fl
Gt0vZEZvdRahhHdr96abdN/dvyy96SQ++HMPixRmrF+fE1BHCqF9Kq6xUdO5
k0tbsOAo2k5Pp6if0768jrnNOQflEYkr6gZphybvyGg6jK31QbIokv73/Y3x
evIg7hx78jhvgs43FYSEClIhWfmFmGOkze9THWxKQTZVFedlpi32SLlGJoHF
PjCsfEO7Jc0vUvANmFbPLpdM0347y2sld0Anj+AnzdAWshx5gk1Q8Os+D56l
vbzRkC8IRcUyO8uHD7QZjD7lxM6v/gMWmxIG
      "]]}, {}}, {{}, {}, {}, {}, {}, {}}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["K", TraditionalForm], 
    FormBox["\[CapitalDelta]", TraditionalForm]},
  AxesOrigin->{0, 0},
  LabelStyle->Directive[FontSize -> 8],
  Method->{},
  PlotRange->{{0, 1}, {0, 0.7}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], Automatic}]], "Output",
 CellChangeTimes->{
  3.7324217273886604`*^9, {3.7324217707826605`*^9, 3.7324218026116605`*^9}, 
   3.7324218335236607`*^9, 3.73242188608366*^9, {3.7324219498306603`*^9, 
   3.7324219587176604`*^9}, {3.7324220337566605`*^9, 3.7324220461966605`*^9}, 
   3.7324221261196604`*^9, 3.73242229209766*^9, {3.73242233133366*^9, 
   3.7324223565156603`*^9}, 3.7324226565486603`*^9, 3.7324227128916607`*^9, {
   3.73242297149666*^9, 3.73242301951766*^9}, 3.7324230569566603`*^9, 
   3.7324231582836604`*^9, 3.7324232239486604`*^9, 3.7324233182916603`*^9, 
   3.7324234596186604`*^9, 3.7324235093626604`*^9, {3.7324235433946605`*^9, 
   3.7324235696656604`*^9}, {3.7324236009306602`*^9, 3.7324237044826603`*^9}, 
   3.7324237422006607`*^9, 3.7324237836466603`*^9, 3.73242406848466*^9, {
   3.7324268762186604`*^9, 3.73242689215666*^9}, 3.7324269493756604`*^9, 
   3.7324269905706606`*^9, {3.7324270321266603`*^9, 3.7324271146036606`*^9}, 
   3.73242717750566*^9, 3.7324272506346607`*^9, 3.7328596151049156`*^9, 
   3.7328599146889157`*^9, 3.7328874685632772`*^9, 3.734438151378663*^9, 
   3.734441354679039*^9, {3.7403841610714436`*^9, 3.7403841962761374`*^9}, {
   3.740385538079082*^9, 3.7403855525706515`*^9}, 3.7403856009643164`*^9, 
   3.7403857173518367`*^9, {3.7405690121373587`*^9, 3.740569016273364*^9}, {
   3.7405692118106923`*^9, 3.740569267987169*^9}, 3.7405693776850247`*^9, {
   3.7405707559399114`*^9, 3.7405707622065525`*^9}, {3.7405708902292023`*^9, 
   3.740570925483008*^9}, 3.740571091164894*^9, {3.7405711456405773`*^9, 
   3.74057123707788*^9}, 3.740571348266303*^9, {3.740571477578347*^9, 
   3.740571487444601*^9}, 3.740571661054823*^9, {3.740571738894944*^9, 
   3.7405717668302045`*^9}, {3.7405718254489527`*^9, 
   3.7405718355738935`*^9}, {3.7405720215433493`*^9, 
   3.7405720340837173`*^9}, {3.7405720874978456`*^9, 3.7405721092086143`*^9}, 
   3.740572582518315*^9, {3.740572615643454*^9, 3.740572663254141*^9}, 
   3.7405727561219826`*^9, {3.740572848440627*^9, 3.740572956455037*^9}, 
   3.7405729894184895`*^9, 3.740573078991833*^9, 3.740573111640705*^9, 
   3.7405731462167053`*^9, 3.7407226141897416`*^9, 3.7407411029217834`*^9, 
   3.7408013260715*^9, 3.740802426124801*^9, {3.740802476863736*^9, 
   3.7408025263282485`*^9}, 3.740802571510442*^9, 3.7408041248009167`*^9, 
   3.740804610826007*^9, 3.7408049312650623`*^9, {3.740804974308567*^9, 
   3.7408049862964106`*^9}, 3.740805072143558*^9, 3.740805757700639*^9, 
   3.740805997544243*^9, 3.7408060646172533`*^9, {3.7408095114377213`*^9, 
   3.7408095287958674`*^9}, 3.740809616485101*^9, 3.740809819023181*^9, {
   3.740810414262969*^9, 3.7408104283614426`*^9}, {3.740810458805442*^9, 
   3.740810486540618*^9}, {3.7408106998604727`*^9, 3.7408107207840233`*^9}, {
   3.7408107727642922`*^9, 3.7408107890826883`*^9}}]
}, Open  ]]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["The Test and Figure 2", "Section",
 CellChangeTimes->{{3.660980757691678*^9, 3.660980759020569*^9}, {
  3.66098100496745*^9, 3.660981008049509*^9}, {3.661849700749787*^9, 
  3.661849703001012*^9}, {3.662097642565343*^9, 3.662097646777343*^9}, {
  3.665986378475314*^9, 3.665986379943461*^9}, {3.6945032842646027`*^9, 
  3.694503303333802*^9}, {3.7155762589702334`*^9, 3.715576275546233*^9}, {
  3.715576325435233*^9, 3.7155763266982336`*^9}, {3.7155802595072336`*^9, 
  3.715580274355233*^9}, {3.7269169324855947`*^9, 3.726916933156395*^9}, {
  3.7403827677324853`*^9, 3.7403827700506496`*^9}, {3.7405755084514523`*^9, 
  3.740575510518954*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"As", " ", "seen", " ", "in", " ", "the", " ", "text"}], ",", " ", 
   RowBox[{
   "there", " ", "is", " ", "some", " ", "freedom", " ", "in", " ", 
    "determining", " ", "F1h", " ", "and", " ", "p1h"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7269169356075945`*^9, 3.726916935888395*^9}, {
  3.726917459546795*^9, 3.7269175051017947`*^9}, {3.732970341840488*^9, 
  3.732970404918488*^9}, {3.732971102808488*^9, 3.732971128155488*^9}, {
  3.7405732911555614`*^9, 3.7405733042654448`*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
    RowBox[{
    "We", " ", "follow", " ", "the", " ", "approach", " ", "in", " ", "the", 
     " ", "paper", " ", "and", " ", "assume", " ", "that", " ", "F1H"}], "=", 
    RowBox[{
     RowBox[{
      RowBox[{"F1Exclusive", ".", " ", "\[IndentingNewLine]", 
       RowBox[{"-", " ", "It"}]}], " ", "is", " ", "immediate", " ", "that", 
      " ", "when", " ", "F1Exclusive"}], "=", "0"}]}], ",", " ", 
   RowBox[{
    RowBox[{
    "then", " ", "the", " ", "test", " ", "here", " ", "is", " ", "as", " ", 
     "with", " ", "linear", " ", 
     RowBox[{"pricing", ".", "\[IndentingNewLine]", 
      RowBox[{"-", " ", "Consider"}]}], " ", "next", " ", "the", " ", "case", 
     " ", "in", " ", "which", " ", "instead", " ", "F1Exclusive"}], ">", 
    RowBox[{"0", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"i", ".", "e", ".", " ", "the"}], " ", "unconstrained", " ", 
       "case", " ", "for", " ", "exclusivity"}], ")"}]}]}], ",", " ", 
   RowBox[{
   "with", " ", "two", " ", "part", " ", "tariffs", " ", "equal", " ", "to", 
    " ", "p1m", " ", "and", " ", "F1m"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.732972289998488*^9, 3.7329723726264877`*^9}, {
  3.732972620451488*^9, 3.732972677754488*^9}, {3.7405733401689787`*^9, 
  3.740573340514902*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "First", " ", "we", " ", "see", " ", "the", " ", "case", " ", "of", " ", 
   "exclusive", " ", "constrained", " ", 
   RowBox[{"price", ":"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.732973638698488*^9, 3.7329736490744877`*^9}, 
   3.74007115226563*^9}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"v", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}], " ", "q2"}]}], "/.", 
     RowBox[{"q2", "\[Rule]", "k"}]}], "/.", 
    RowBox[{"q1", "->", "q1rationed"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"Ve2", ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"%%", "\[Equal]", "%"}], ",", "p1"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"p1HTestconstr", "=", 
  RowBox[{"%", "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{3.7329735228550253`*^9, 3.7329735632800674`*^9}],

Cell[BoxData[
 RowBox[{"1", "-", 
  RowBox[{"k", " ", "\[Gamma]"}]}]], "Output",
 CellChangeTimes->{3.7329735248642263`*^9, 3.732973564221161*^9, 
  3.734440877664405*^9, 3.740070841731125*^9, 3.7403814560450163`*^9, 
  3.7405733457668743`*^9, 3.7407411043933334`*^9, 3.740801327130274*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"q1e", "/.", 
   RowBox[{"p1", "->", "p1Eequcorn"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"krconstr", "=", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{"%", "*", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"p1HTestconstr", "-", "p1Eequcorn"}], ")"}], "/", 
     RowBox[{"(", 
      RowBox[{"p1HTestconstr", "-", "c"}], ")"}]}]}], 
   "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"k", "\[Equal]", "krconstr"}], ",", "d"}], "]"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"dTESTconstr", "=", 
  RowBox[{"%", "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.732973439509691*^9, 3.732973469057646*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{"k", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "2"}], "+", 
     RowBox[{"2", " ", "c"}], "+", 
     RowBox[{"2", " ", "d"}], "+", "k", "+", 
     RowBox[{
      SqrtBox[
       RowBox[{
        RowBox[{"-", "k"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
         ")"}]}]], " ", "\[Gamma]"}]}], ")"}]}], 
  RowBox[{
   RowBox[{"-", "1"}], "+", "c", "+", 
   RowBox[{"k", " ", "\[Gamma]"}]}]]], "Output",
 CellChangeTimes->{3.7329735373024693`*^9, 3.7344408778890023`*^9, 
  3.7400708419547195`*^9, 3.740381456290671*^9, 3.7405733482023535`*^9, 
  3.7407411047542953`*^9, 3.7408013276366205`*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "4"], " ", 
  RowBox[{"(", 
   RowBox[{"2", "-", 
    RowBox[{"2", " ", "c"}], "-", 
    SqrtBox[
     RowBox[{"k", " ", 
      SuperscriptBox["\[Gamma]", "2"], " ", 
      RowBox[{"(", 
       RowBox[{"4", "-", 
        RowBox[{"4", " ", "c"}], "+", 
        RowBox[{"k", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "4"}], "+", "\[Gamma]"}], ")"}], " ", "\[Gamma]"}]}], 
       ")"}]}]], "-", 
    RowBox[{"k", " ", 
     RowBox[{"(", 
      RowBox[{"2", "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "2"}], "+", "\[Gamma]"}], ")"}], " ", "\[Gamma]"}]}], 
      ")"}]}]}], ")"}]}]], "Output",
 CellChangeTimes->{3.7329735373024693`*^9, 3.7344408778890023`*^9, 
  3.7400708419547195`*^9, 3.740381456290671*^9, 3.7405733482023535`*^9, 
  3.7407411047542953`*^9, 3.740801328114932*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Now", " ", "we", " ", "see", " ", "the", " ", "monopoly", " ", "price", 
     " ", "case", " ", "when", " ", "in", " ", "common", " ", 
     "representation", " ", 
     RowBox[{"(", 
      RowBox[{"off", "-", "equilibrium"}], ")"}]}], ",", " ", 
    RowBox[{"q2", "\[LessEqual]", 
     RowBox[{"K", " ", "is", " ", "binding"}]}]}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"ve1", "-", 
        RowBox[{"p1", " ", "q1"}]}], "/.", 
       RowBox[{"q1", "\[Rule]", 
        RowBox[{"1", "-", "p1"}]}]}], "/.", 
      RowBox[{"p1", "\[Rule]", "p1m"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"v", "-", 
         RowBox[{"p1", " ", "q1"}], "-", 
         RowBox[{"p2", " ", "q2"}]}], "/.", 
        RowBox[{"q2", "\[Rule]", "k"}]}], "/.", 
       RowBox[{"p2", "\[Rule]", 
        RowBox[{"c", "+", "d"}]}]}], "/.", 
      RowBox[{"q1", "\[Rule]", "q1rationed"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{"%", "\[Equal]", "%%"}], ",", "p1"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"N", "[", 
    RowBox[{"%", "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.2"}], ",", 
       RowBox[{"d", "\[Rule]", "0.1"}], ",", 
       RowBox[{"k", "\[Rule]", "0.1"}], ",", 
       RowBox[{"\[Mu]", "\[Rule]", "2"}]}], "}"}]}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"p1HMonkbind", "=", 
    RowBox[{"%%", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"N", "[", 
    RowBox[{"%", "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.2"}], ",", 
       RowBox[{"d", "\[Rule]", "0.1"}], ",", 
       RowBox[{"k", "\[Rule]", "0.1"}], ",", 
       RowBox[{"\[Mu]", "\[Rule]", "2"}]}], "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{
  3.732973153877777*^9, {3.7329731893808765`*^9, 3.7329732078085613`*^9}, {
   3.732973664858488*^9, 3.7329736852584877`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", "0.5441101056459325`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", "1.4158898943540674`"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.732973194364873*^9, 3.7329732083516703`*^9}, 
   3.734440880822835*^9, 3.740070844883551*^9, 3.7403814592024145`*^9, 
   3.740573355556923*^9, 3.740741108057844*^9, 3.740801331585121*^9}],

Cell[BoxData[
 RowBox[{"1", "-", 
  RowBox[{"k", " ", "\[Gamma]"}], "-", 
  RowBox[{
   FractionBox["1", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]], 
   RowBox[{"(", 
    RowBox[{"\[Sqrt]", 
     RowBox[{"(", 
      RowBox[{
       SuperscriptBox[
        RowBox[{"(", 
         RowBox[{"1", "+", 
          RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"], " ", 
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"1", "+", "\[Mu]"}], ")"}], "2"], "+", 
         RowBox[{
          SuperscriptBox["c", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "d"}], ")"}], " ", "k", " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}], "+", 
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{"k", "+", 
            RowBox[{"2", " ", "k", " ", "\[Mu]"}]}], ")"}], "2"], "+", 
         RowBox[{"2", " ", "c", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{"1", "+", "\[Mu]"}], ")"}], "2"]}], "+", 
            RowBox[{"k", " ", 
             SuperscriptBox[
              RowBox[{"(", 
               RowBox[{"1", "+", 
                RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]}]}], ")"}]}]}], 
        ")"}]}], ")"}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{{3.732973194364873*^9, 3.7329732083516703`*^9}, 
   3.734440880822835*^9, 3.740070844883551*^9, 3.7403814592024145`*^9, 
   3.740573355556923*^9, 3.740741108057844*^9, 3.740801331587127*^9}],

Cell[BoxData["0.5441101056459325`"], "Output",
 CellChangeTimes->{{3.732973194364873*^9, 3.7329732083516703`*^9}, 
   3.734440880822835*^9, 3.740070844883551*^9, 3.7403814592024145`*^9, 
   3.740573355556923*^9, 3.740741108057844*^9, 3.740801331589134*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"q1e", "/.", 
   RowBox[{"p1", "\[Rule]", "p1m"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tmp", "=", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"k", "*", "c"}], "+", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"%", "-", "k"}], ")"}], "p1HMonkbind"}], "+", "0", "-", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"%", "*", "p1m"}], "+", "F1m"}], ")"}]}], "\[Equal]", "0"}], 
     ",", "d"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dTestTwoPart1", "=", 
   RowBox[{"tmp", "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dTestTwoPart2", "=", 
   RowBox[{"tmp", "[", 
    RowBox[{"[", 
     RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.726988357328991*^9, 3.726988464220191*^9}, 
   3.726988512236991*^9, 3.727266320968094*^9, {3.732972712029488*^9, 
   3.732972782204488*^9}, 3.732973236466292*^9, 3.732973627155488*^9, {
   3.7400722937561464`*^9, 3.7400723872256513`*^9}, {3.7400734392299027`*^9, 
   3.7400734432004595`*^9}, {3.740114069881284*^9, 3.7401140836609297`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"q1e", "/.", 
   RowBox[{"p1", "\[Rule]", "p1m"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"%", "*", "p1m"}], "+", "F1m", "-", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"k", "*", "c"}], "+", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"%", "-", "k"}], ")"}], "p1HMonkbind"}], "+", "0"}], ")"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"ContourPlot", "[", 
    RowBox[{"%", ",", 
     RowBox[{"{", 
      RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"Contours", "->", 
      RowBox[{"{", "0", "}"}]}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Mu]", ",", "8"}], "}"}], ",", "0", ",", "10"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"c", ",", "0", ",", "1"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.7400720399651966`*^9, 3.7400721312368803`*^9}, {
  3.7400721810824413`*^9, 3.740072211963564*^9}, {3.740072468741439*^9, 
  3.74007251728353*^9}, {3.74007297315242*^9, 3.7400729739014444`*^9}, {
  3.740073084442377*^9, 3.740073127255234*^9}, {3.740073293926479*^9, 
  3.7400732996236353`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 
    0, $CellContext`\[Mu]$$ = 8, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Mu]$$], 8}, 0, 10}, {
      Hold[$CellContext`\[Gamma]$$], 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}}, Typeset`size$$ = {720., {348., 369.}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = 
    True, $CellContext`\[Mu]$263921$$ = 0, $CellContext`\[Gamma]$263922$$ = 
    0, $CellContext`c$263923$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 
        0, $CellContext`\[Mu]$$ = 8}, "ControllerVariables" :> {
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$263921$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$263922$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$263923$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[-$CellContext`c$$ $CellContext`k + 
        Rational[1, 2] (1 + $CellContext`\[Mu]$$)^(-1) (
          2 (-1 + $CellContext`c$$ + $CellContext`d) $CellContext`k + \
$CellContext`k^2 + (-1 + $CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
             2 $CellContext`\[Mu]$$)^(-2)) + (1 + 
           2 $CellContext`\[Mu]$$)^(-1) ($CellContext`c$$ + \
$CellContext`\[Mu]$$ + $CellContext`c$$ $CellContext`\[Mu]$$) (
          1 - (1 + 
            2 $CellContext`\[Mu]$$)^(-1) ($CellContext`c$$ + $CellContext`\
\[Mu]$$ + $CellContext`c$$ $CellContext`\[Mu]$$)) - (
         1 - $CellContext`k - (1 + 
           2 $CellContext`\[Mu]$$)^(-1) ($CellContext`c$$ + \
$CellContext`\[Mu]$$ + $CellContext`c$$ $CellContext`\[Mu]$$)) (
         1 - $CellContext`k $CellContext`\[Gamma]$$ - (1 + 
           2 $CellContext`\[Mu]$$)^(-2) ((1 + 
             2 $CellContext`\[Mu]$$)^2 ((
              1 + $CellContext`\[Mu]$$)^2 + $CellContext`c$$^2 (
               1 + $CellContext`\[Mu]$$)^2 + 
            2 (-1 + $CellContext`d) $CellContext`k (1 + 
               2 $CellContext`\[Mu]$$)^2 + ($CellContext`k + 
              2 $CellContext`k $CellContext`\[Mu]$$)^2 + 
            2 $CellContext`c$$ (-(
                 1 + $CellContext`\[Mu]$$)^2 + $CellContext`k (1 + 
                 2 $CellContext`\[Mu]$$)^2)))^
          Rational[1, 2]), {$CellContext`k, 0, 1.1}, {$CellContext`d, 0, 1}, 
        Contours -> {0}], 
      "Specifications" :> {{{$CellContext`\[Mu]$$, 8}, 0, 
         10}, {$CellContext`\[Gamma]$$, 0, 1}, {$CellContext`c$$, 0, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {497., 508.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.740072193616767*^9, 3.7400722125671773`*^9}, {
   3.740072475543523*^9, 3.740072517795896*^9}, 3.7400730886135025`*^9, 
   3.7400733010153294`*^9, 3.740381460467809*^9, 3.74074110953763*^9, 
   3.740801333330766*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "The", " ", "white", " ", "area", " ", "is", " ", "the", " ", "one", " ", 
   "where", " ", "the", " ", "unconstrained", " ", "pricing", " ", "occurs", 
   " ", "in", " ", "exclusivity"}], "*)"}]], "Input",
 CellChangeTimes->{{3.7400728107906365`*^9, 3.7400728576583033`*^9}, {
  3.7400732644891996`*^9, 3.7400732655019054`*^9}}],

Cell[BoxData[""], "Input",
 CellChangeTimes->{3.7400721902187395`*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"The", " ", "relevant", " ", "boundaries", " ", 
    RowBox[{"are", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"F1m", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"dTestTwoPart2", ";"}], "\[IndentingNewLine]", 
   RowBox[{"dTESTconstr", ";"}], "\[IndentingNewLine]", 
   RowBox[{"dTestTwoPart1", ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"%", ",", 
         RowBox[{"1", "-", "k"}], ",", "%%", ",", "%%%", ",", "%%%%"}], "}"}],
        ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "1"}], "}"}]}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "8"}], "}"}], ",", "0", ",", "10"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.2"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.726988694148591*^9, 3.726988769746191*^9}, {
   3.726989344962191*^9, 3.726989383244591*^9}, {3.7272663886568985`*^9, 
   3.7272664217264986`*^9}, {3.732972789818488*^9, 3.732972803477488*^9}, {
   3.7329732807061377`*^9, 3.732973285330063*^9}, {3.7329735456883082`*^9, 
   3.7329735461693563`*^9}, {3.7329735793726764`*^9, 3.7329735831470537`*^9}, 
   3.7400714607374763`*^9, {3.7400724030006504`*^9, 3.7400724263517027`*^9}, {
   3.740073132385877*^9, 3.7400731376569405`*^9}, {3.740073471647107*^9, 
   3.7400734962816257`*^9}, {3.740073611596332*^9, 3.740073611904185*^9}, {
   3.7401142199156427`*^9, 3.740114239282143*^9}, {3.7405733711032915`*^9, 
   3.7405733782001762`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 
    0.2, $CellContext`\[Mu]$$ = 8, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Mu]$$], 8}, 0, 10}, {{
       Hold[$CellContext`\[Gamma]$$], 0.2}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}}, Typeset`size$$ = {720., {226., 248.}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = 
    True, $CellContext`\[Mu]$264435$$ = 0, $CellContext`\[Gamma]$264436$$ = 
    0, $CellContext`c$264437$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 
        0.2, $CellContext`\[Mu]$$ = 8}, "ControllerVariables" :> {
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$264435$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$264436$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$264437$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{Rational[
          1, 2] ((-4) $CellContext`k^2 - 
           32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
           96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
          12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
          16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
          8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
          8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
          8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
          96 $CellContext`k $CellContext`\[Mu]$$ + 
          192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
          96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
          152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
          152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
          48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
          64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
          72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          308 $CellContext`k $CellContext`\[Mu]$$^2 + 
          616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
          308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
          592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
          592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
          232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
          200 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
          256 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          504 $CellContext`k $CellContext`\[Mu]$$^3 + 
          1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
          504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
          1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
          1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
          576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
          304 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
          448 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          440 $CellContext`k $CellContext`\[Mu]$$^4 + 
          880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
          440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
          1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
          1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
          768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
          224 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
          224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
          384 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
          192 $CellContext`k $CellContext`\[Mu]$$^5 + 
          384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
          192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
          704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
          704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
          512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
          64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
          64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
          128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
          32 $CellContext`k $CellContext`\[Mu]$$^6 + 
          64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
          32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
          128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
          128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
          128 $CellContext`k^3 $CellContext`\[Mu]$$^6 - ((12 $CellContext`k - 
             24 $CellContext`c$$ $CellContext`k + 
             12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
             16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
             8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             96 $CellContext`k $CellContext`\[Mu]$$ - 
             192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
             152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
             152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
             48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
             64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             308 $CellContext`k $CellContext`\[Mu]$$^2 - 
             616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
             308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 - 
             592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
             592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
             232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
             200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
             1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 + 
             504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 - 
             1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
             1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
             576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
             304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
             880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
             440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 - 
             1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
             1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
             768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
             224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
             384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
             192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 - 
             704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
             704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
             512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
             64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
             64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
             32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 - 
             128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
             128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
             128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
           4 ((-4) $CellContext`k^2 - 
            32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
            96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
            128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
            64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
            12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
            12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 16 $CellContext`k + 
            48 $CellContext`c$$ $CellContext`k - 
            48 $CellContext`c$$^2 $CellContext`k + 
            16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
            52 $CellContext`c$$ $CellContext`k^2 + 
            26 $CellContext`c$$^2 $CellContext`k^2 - 16 $CellContext`k^3 + 
            16 $CellContext`c$$ $CellContext`k^3 + 3 $CellContext`k^4 + 
            4 $CellContext`k $CellContext`\[Gamma]$$ - 
            12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
            12 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
            4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
            4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
            8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
            4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
            4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
            4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
            4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
            4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
            8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
            4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
            8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
            8 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
            4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
            16 $CellContext`\[Mu]$$ - 
            64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
            96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
            64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
            16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
            116 $CellContext`k $CellContext`\[Mu]$$ + 
            348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
            348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
            116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
            224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
            448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
            224 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$ - 
            156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
            156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
            32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
            32 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
            96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
            96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
            32 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
            44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
            88 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
            44 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
            24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
            24 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
            36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
            
            32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
            64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
            32 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
            72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
            72 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
            40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
            136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
            204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
            136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
            34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
            336 $CellContext`k $CellContext`\[Mu]$$^2 + 
            1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
            1008 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
            336 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^2 + 
            782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
            1564 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
            782 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
            624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
            624 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
            140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
            104 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
            312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
            312 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
            104 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
            196 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
            392 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
            196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
            28 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
            28 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
            128 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
            104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            208 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
            104 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
            264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
            264 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
            164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
            144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
            216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
            144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
            36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
            492 $CellContext`k $CellContext`\[Mu]$$^3 + 
            1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
            1476 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
            492 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^3 + 
            1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
            2808 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
            1404 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
            1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
            1304 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
            320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
            176 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
            528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
            528 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
            176 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
            452 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
            904 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
            452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
            104 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
            104 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
            224 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
            176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            352 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
            176 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
            504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
            504 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
            352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
            76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
            114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
            76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
            19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
            376 $CellContext`k $CellContext`\[Mu]$$^4 + 
            1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
            1128 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
            376 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^4 + 
            1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
            2688 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
            1344 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
            1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
            1488 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
            400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
            164 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
            492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
            492 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
            164 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
            568 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
            1136 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
            568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
            336 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
            336 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
            192 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
            164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            328 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
            164 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
            528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
            528 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
            416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
            16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
            24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
            16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
            4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
            136 $CellContext`k $CellContext`\[Mu]$$^5 + 
            408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
            408 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
            136 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^5 + 
            624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
            1248 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
            624 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
            864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
            864 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
            256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
            80 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
            240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
            240 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
            80 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
            368 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
            736 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
            368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
            352 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
            352 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
            64 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
            80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
            160 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
            80 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
            288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
            288 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
            256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
            48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
            48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
            16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
            96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
            192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
            96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
            192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
            192 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
            64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
            16 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
            48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
            48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
            16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
            96 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
            192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
            96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
            128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
            128 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
            16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
            32 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
            16 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
            64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
            64 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
            64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6))^Rational[1, 2]), 1 - $CellContext`k, 
         Rational[1, 4] (2 - 
          2 $CellContext`c$$ - ($CellContext`k $CellContext`\[Gamma]$$^2 (4 - 
            4 $CellContext`c$$ + $CellContext`k (-4 + \
$CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$))^
          Rational[1, 2] - $CellContext`k (
           2 + (-2 + $CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$)), 
         Rational[
          1, 2] ((-4) $CellContext`k^2 - 
           32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
           96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
          12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
          16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
          8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
          8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
          8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
          96 $CellContext`k $CellContext`\[Mu]$$ + 
          192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
          96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
          152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
          152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
          48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
          64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
          72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
          308 $CellContext`k $CellContext`\[Mu]$$^2 + 
          616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
          308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
          592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
          592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
          232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
          200 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
          256 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
          504 $CellContext`k $CellContext`\[Mu]$$^3 + 
          1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
          504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
          1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
          1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
          576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
          304 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
          448 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
          440 $CellContext`k $CellContext`\[Mu]$$^4 + 
          880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
          440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
          1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
          1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
          768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
          224 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
          224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
          384 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
          192 $CellContext`k $CellContext`\[Mu]$$^5 + 
          384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
          192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
          704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
          704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
          512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
          64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
          64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
          128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
          32 $CellContext`k $CellContext`\[Mu]$$^6 + 
          64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
          32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
          128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
          128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
          128 $CellContext`k^3 $CellContext`\[Mu]$$^6 + ((12 $CellContext`k - 
              24 $CellContext`c$$ $CellContext`k + 
              12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
              16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
              8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
              96 $CellContext`k $CellContext`\[Mu]$$ - 
              192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
              96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
              152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
              152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
              48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
              616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
              308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 - 
              592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
              200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
              1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 + 
              504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 - 
              1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
              304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
              880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
              440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 - 
              1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
              224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
              384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
              192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 - 
              704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
              64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
              32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 - 
              128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
            4 ((-4) $CellContext`k^2 - 
             32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
             12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
             12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 16 $CellContext`k + 
             48 $CellContext`c$$ $CellContext`k - 
             48 $CellContext`c$$^2 $CellContext`k + 
             16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
             52 $CellContext`c$$ $CellContext`k^2 + 
             26 $CellContext`c$$^2 $CellContext`k^2 - 16 $CellContext`k^3 + 
             16 $CellContext`c$$ $CellContext`k^3 + 3 $CellContext`k^4 + 
             4 $CellContext`k $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
             16 $CellContext`\[Mu]$$ - 
             64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
             64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
             16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
             116 $CellContext`k $CellContext`\[Mu]$$ + 
             348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
             348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
             116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
             224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
             224 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
             156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
             32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
             32 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             32 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             88 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             44 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             24 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             
             32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             32 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             72 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
             136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
             204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
             136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
             34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
             336 $CellContext`k $CellContext`\[Mu]$$^2 + 
             1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
             1008 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
             336 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^2 + 
             782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             1564 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
             782 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
             624 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
             140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
             104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             312 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             196 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             392 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             28 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             28 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             128 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             208 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
             264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             264 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
             144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
             216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
             144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
             36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
             492 $CellContext`k $CellContext`\[Mu]$$^3 + 
             1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
             1476 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
             492 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^3 + 
             1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             2808 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
             1404 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
             1304 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
             320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
             176 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             528 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             452 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             904 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             104 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             104 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             224 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             352 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
             504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             504 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
             76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
             114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
             76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
             19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
             376 $CellContext`k $CellContext`\[Mu]$$^4 + 
             1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
             1128 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
             376 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^4 + 
             1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
             2688 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
             1344 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
             1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
             1488 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
             400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
             164 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             492 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             568 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             1136 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             336 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             336 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             192 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             328 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
             528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             528 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
             24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
             16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
             4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
             136 $CellContext`k $CellContext`\[Mu]$$^5 + 
             408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
             408 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
             136 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^5 + 
             624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
             1248 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
             624 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
             864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
             864 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
             256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
             80 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
             240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             240 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             368 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             736 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             352 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             352 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             64 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
             160 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
             288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             288 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
             48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
             16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
             96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
             192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
             96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
             192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
             192 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
             64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
             16 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             96 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             128 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
             32 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
             64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             64 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6))^Rational[1, 2]), 
         Rational[-1, 2] $CellContext`k^(-1) (
          2 (-1 + $CellContext`c$$) $CellContext`k + $CellContext`k^2 + (-1 + \
$CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
             2 $CellContext`\[Mu]$$)^(-2))}, {$CellContext`k, 0, 1}, 
        PlotRange -> {0, 1}], 
      "Specifications" :> {{{$CellContext`\[Mu]$$, 8}, 0, 
         10}, {{$CellContext`\[Gamma]$$, 0.2}, 0, 1}, {$CellContext`c$$, 0, 
         1}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {375., 386.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.7400724139938383`*^9, 3.7400724269111905`*^9}, 
   3.7400731386134396`*^9, {3.7400734505931144`*^9, 3.740073497795644*^9}, 
   3.740073612960961*^9, {3.740114224419612*^9, 3.740114243551491*^9}, 
   3.7403814607545834`*^9, 3.7405733792619996`*^9, 3.7407411098694935`*^9, 
   3.7408013336466036`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
   "The", " ", "test", " ", "is", " ", "fails", " ", "below", " ", "the", " ",
     "green", " ", "line", " ", "for", " ", "k", " ", "lower", " ", "than", 
    " ", "the", " ", "largest", " ", "k", " ", "at", " ", "which", " ", "the",
     " ", "green", " ", "and", " ", "yellow", " ", "intercept", " ", "and"}], 
   ",", " ", 
   RowBox[{"for", " ", "larger", " ", "k"}], ",", " ", 
   RowBox[{"below", " ", "the", " ", "yellow", " ", 
    RowBox[{"line", ":", " ", 
     RowBox[{
     "This", " ", "shows", " ", "that", " ", "the", " ", "figure", " ", "is", 
      " ", "qualitatively", " ", "similar", " ", "to", " ", "the", " ", 
      "case", " ", "of", " ", "linear", " ", 
      RowBox[{"pricing", "."}]}]}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7329732996149187`*^9, 3.7329733186496067`*^9}, {
  3.732973745028488*^9, 3.732973849796488*^9}, {3.74007323136611*^9, 
  3.740073232077998*^9}, {3.740073557767179*^9, 3.7400735651598873`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Now", " ", "the", " ", "relevant", " ", "boundaries", " ", "of", " ", 
    "Figure", " ", "2"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"F1m", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"dTestTwoPart2", ";"}], "\[IndentingNewLine]", 
   RowBox[{"dTESTconstr", ";"}], "\[IndentingNewLine]", 
   RowBox[{"dTestTwoPart1", ";"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Piecewise", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"dWelfaremix", "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
         RowBox[{
          RowBox[{"dWelfaremix", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
          "dkswitchmix"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Re", "[", " ", 
          RowBox[{"dWelfPure", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         RowBox[{
          RowBox[{
           RowBox[{"dWelfaremix", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
           "dkswitchmix"}], "&&", 
          RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"Null", ",", 
         RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Quiet", "[", 
      RowBox[{"Plot", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"%", ",", "%%", ",", "%%%", ",", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"1", "-", "c"}], ")"}], 
           RowBox[{"(", 
            RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", 
          RowBox[{"1", "-", "k"}], ",", "%%", ",", "%%%", ",", "%%%%", ",", 
          "%%%%%"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"k", ",", "0.001", ",", "1"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"0", ",", "1"}], "}"}]}], ",", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{
          "Magenta", ",", "Blue", ",", "Green", ",", " ", "Black", ",", 
           "Thick"}], "}"}]}]}], "]"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.2"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"c", ",", "0.0001"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "10"}], "}"}], ",", "0", ",", "120"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.740115184384904*^9, 3.740115251122383*^9}, {
   3.7401153719364977`*^9, 3.7401153744265165`*^9}, {3.7401155489550257`*^9, 
   3.740115552154539*^9}, 3.740115593419319*^9, {3.740573398841096*^9, 
   3.7405734120141506`*^9}, {3.7405735933747206`*^9, 3.7405736435331836`*^9}, 
   3.7405737153522835`*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0.0001, $CellContext`\[Gamma]$$ = 
    0.2, $CellContext`\[Mu]$$ = 10, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.2}, 0, 1}, {{
       Hold[$CellContext`c$$], 0.0001}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 10}, 0, 120}}, Typeset`size$$ = {
    720., {226., 247.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$264458$$ = 
    0, $CellContext`c$264459$$ = 0, $CellContext`\[Mu]$264460$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0.0001, $CellContext`\[Gamma]$$ = 
        0.2, $CellContext`\[Mu]$$ = 10}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$264458$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$264459$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$264460$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Quiet[
        Plot[{
          
          Piecewise[{{
            Rational[-1, 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
               1 + $CellContext`\[Mu]$$)^(-1) (1 + 
               2 $CellContext`\[Mu]$$)^(-3) (
              4 $CellContext`k $CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
              4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
              4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
              2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
              
              2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
              4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
              30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
              30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
              10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
              5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 28 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
              28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              12 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
              12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
              7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$ - 
              30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
              84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
              18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
              9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
              72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
              72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
              12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
              30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
              30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
              21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
              84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
              2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
              104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
              14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
              7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
              80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
              80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
              24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
              38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
              38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
              31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
              104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
              8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
              48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
              4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
              32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
              32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
              16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
              20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
              20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
              18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
              48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
              8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                Rational[
                 1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                  2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                 4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                 8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                   2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                 4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                  63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                  511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                  257 $CellContext`\[Mu]$$^6) - 
                 
                 4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                  4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                  22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                  3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2] $CellContext`\[Mu]$$ + 
                  3 $CellContext`\[Mu]$$^2 + 
                  40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                  3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                  24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                   Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                   2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                   4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                   2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                   2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                  18 $CellContext`\[Mu]$$ - (65 + 
                   4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                  12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                  3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                  2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                   4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                  4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                   148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                  2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                   16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                  3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
               Rational[1, 2]), 
             Rational[-1, 
                4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                2 $CellContext`\[Mu]$$)^(-3) (
               4 $CellContext`k $CellContext`\[Gamma]$$ - 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
               4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
               2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
               4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
               30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
               28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               12 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$ - 
               30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
               84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
               9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
               72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
               12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
               84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
               14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
               7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
               80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
               24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
               104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
               16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
               48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                 Rational[
                  1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                  4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                  8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                  4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                   63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                   511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                   257 $CellContext`\[Mu]$$^6) - 
                  
                  4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                   4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                   22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                   3 $CellContext`\[Mu]$$^2 + 
                   40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                   24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                   18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                   12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                   3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                   2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                   4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                   2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                   3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                Rational[1, 2]) < -$CellContext`\[Gamma]$$^(-1) (
               1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                3 $CellContext`\[Mu]$$ + 
                2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                 2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                 Rational[1, 2]) (1 + 
                2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$))}, {
            Rational[1, 2] 
             Re[(-1 - 6 $CellContext`\[Mu]$$ + 
                 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 13 $CellContext`\[Mu]$$^2 + 
                 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 12 $CellContext`\[Mu]$$^3 + 
                 8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`\[Mu]$$^4 + 
                 3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) (-2 + 
                2 $CellContext`c$$ + 2 $CellContext`k + 
                2 $CellContext`\[Gamma]$$ - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
                2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
                12 $CellContext`\[Mu]$$ + 
                12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                16 $CellContext`k $CellContext`\[Mu]$$ + 
                8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                8 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                26 $CellContext`\[Mu]$$^2 + 
                26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                48 $CellContext`k $CellContext`\[Mu]$$^2 + 
                10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                10 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                24 $CellContext`\[Mu]$$^3 + 
                24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                64 $CellContext`k $CellContext`\[Mu]$$^3 + 
                4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                32 $CellContext`k $CellContext`\[Mu]$$^4 + 
                6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
                2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 - ((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 
                   2 $CellContext`\[Gamma]$$ + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                   2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                   12 $CellContext`\[Mu]$$ - 
                   12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   16 $CellContext`k $CellContext`\[Mu]$$ - 
                   8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   26 $CellContext`\[Mu]$$^2 - 
                   26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                   10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                   52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 + 
                   24 $CellContext`\[Mu]$$^3 - 
                   24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                   80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 - 
                   16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                   32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                   6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                   48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 - 
                   18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 + 
                   2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\
\[Mu]$$^4)^2 - 4 (-1 - 6 $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  13 $CellContext`\[Mu]$$^2 + 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  12 $CellContext`\[Mu]$$^3 + 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Mu]$$^4 + 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
                  4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 
                  2 $CellContext`k - 
                  2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
                  2 $CellContext`\[Gamma]$$ - 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                  2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
                  2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                  2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^2 - 12 $CellContext`\[Mu]$$ + 
                  24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                  12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
                  16 $CellContext`k $CellContext`\[Mu]$$ - 
                  16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                  8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                  8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 
                  16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 26 $CellContext`\[Mu]$$^2 + 
                  52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                  26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
                  48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                  48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                  24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                  10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                  14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                  52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                  52 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 
                  2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                  4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                  4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
                  2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
                  48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                  24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
                  64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                  64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                  32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                  4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                  16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                  80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                  80 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                  4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                  16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                  16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                  16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                  8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
                  32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                  32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                  16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                  6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                  48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                  48 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                  2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                  18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                  18 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
                  9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + 
                  2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 + $CellContext`k^2 $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])], 
             And[
             Rational[-1, 
                 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                 1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                 2 $CellContext`\[Mu]$$)^(-3) (
                4 $CellContext`k $CellContext`\[Gamma]$$ - 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
                4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
                
                2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
                4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
                30 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
                28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
                2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
                12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
                7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$ - 
                30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
                84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                  Rational[
                   1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                    2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                   4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                   8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                   4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                    63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                    511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                    257 $CellContext`\[Mu]$$^6) - 
                   
                   4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                    4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                    22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                    3 $CellContext`\[Mu]$$^2 + 
                    40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                    24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                    18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                    3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                    2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                    4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                    2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                    3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                 Rational[1, 2]) > -$CellContext`\[Gamma]$$^(-1) (
                1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                 3 $CellContext`\[Mu]$$ + 
                 2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                  2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) (1 + 
                 2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$)), $CellContext`k <= 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 11 $CellContext`\[Mu]$$^2 + 
                 19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 20 $CellContext`\[Mu]$$^3 + 
                 32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                 12 $CellContext`\[Mu]$$^4 + 
                 21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                  10 $CellContext`\[Mu]$$^2 + 
                  10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                    8 $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    10 $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4)^2 - 
                 4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                  6 $CellContext`\[Mu]$$ - 
                  12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                  6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  13 $CellContext`\[Mu]$$^2 - 
                  26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                  13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                  7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                  24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                  12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                  8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                  4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                  3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  11 $CellContext`\[Mu]$$^2 + 
                  19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`\[Mu]$$^3 + 
                  32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  12 $CellContext`\[Mu]$$^4 + 
                  21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  
                  9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])]}, {
            Null, $CellContext`k > 
             Rational[
               1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                11 $CellContext`\[Mu]$$^2 + 
                19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                20 $CellContext`\[Mu]$$^3 + 
                32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                12 $CellContext`\[Mu]$$^4 + 
                21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                 8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                 10 $CellContext`\[Mu]$$^2 + 
                 10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                 4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                   8 $CellContext`\[Mu]$$ + 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   10 $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4)^2 - 4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                 6 $CellContext`\[Mu]$$ - 
                 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                 6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                 13 $CellContext`\[Mu]$$^2 - 
                 26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                 13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                 14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                 24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                 12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                 16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                 8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                 4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                 3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                 6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 11 $CellContext`\[Mu]$$^2 + 
                 19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 20 $CellContext`\[Mu]$$^3 + 
                 32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                 12 $CellContext`\[Mu]$$^4 + 
                 21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 
                 9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])}}, 0], 
          Rational[
           1, 2] ((-4) $CellContext`k^2 - 
            32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
            96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
            128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
            64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
           12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
           16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
           8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
           8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
           8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
           96 $CellContext`k $CellContext`\[Mu]$$ + 
           192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
           96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
           152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
           152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
           48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
           64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
           64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
           72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
           308 $CellContext`k $CellContext`\[Mu]$$^2 + 
           616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
           308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
           592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
           200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
           200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
           256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 504 $CellContext`k $CellContext`\[Mu]$$^3 + 
           1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
           504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
           1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
           304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
           304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
           448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 440 $CellContext`k $CellContext`\[Mu]$$^4 + 
           880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
           440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
           1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
           1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
           768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
           224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
           224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
           384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 192 $CellContext`k $CellContext`\[Mu]$$^5 + 
           384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
           192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
           704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
           704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
           512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
           64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
           64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
           128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 32 $CellContext`k $CellContext`\[Mu]$$^6 + 
           64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
           32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
           128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
           128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
           128 $CellContext`k^3 $CellContext`\[Mu]$$^6 - ((12 $CellContext`k - 
              24 $CellContext`c$$ $CellContext`k + 
              12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
              16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
              8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
              96 $CellContext`k $CellContext`\[Mu]$$ - 
              192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
              96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
              152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
              152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
              48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
              616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
              308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 - 
              592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
              200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
              1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 + 
              504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 - 
              1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
              304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
              880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
              440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 - 
              1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
              224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
              384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
              192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 - 
              704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
              64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
              32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 - 
              128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
            4 ((-4) $CellContext`k^2 - 
             32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
             12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
             12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 16 $CellContext`k + 
             48 $CellContext`c$$ $CellContext`k - 
             48 $CellContext`c$$^2 $CellContext`k + 
             16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
             52 $CellContext`c$$ $CellContext`k^2 + 
             26 $CellContext`c$$^2 $CellContext`k^2 - 16 $CellContext`k^3 + 
             16 $CellContext`c$$ $CellContext`k^3 + 3 $CellContext`k^4 + 
             4 $CellContext`k $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
             16 $CellContext`\[Mu]$$ - 
             64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
             64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
             16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
             116 $CellContext`k $CellContext`\[Mu]$$ + 
             348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
             348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
             116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
             224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
             224 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
             156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
             32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
             32 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             32 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             88 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             44 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             24 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             32 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             72 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
             136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
             204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
             136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
             34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
             336 $CellContext`k $CellContext`\[Mu]$$^2 + 
             1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
             1008 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
             336 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^2 + 
             782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             1564 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
             782 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
             624 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
             140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
             104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             312 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             196 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             392 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             28 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             28 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             128 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             208 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
             264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             264 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
             144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
             216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
             144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
             36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
             492 $CellContext`k $CellContext`\[Mu]$$^3 + 
             1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
             1476 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
             492 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^3 + 
             1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             2808 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
             1404 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
             1304 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
             320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
             176 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             528 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             452 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             904 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             104 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             104 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             224 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             352 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
             504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             504 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
             76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
             114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
             76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
             19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
             376 $CellContext`k $CellContext`\[Mu]$$^4 + 
             1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
             1128 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
             376 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^4 + 
             1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
             2688 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
             1344 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
             1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
             1488 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
             400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
             164 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             492 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             568 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             1136 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             336 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             336 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             192 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             328 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
             528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             528 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
             24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
             16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
             4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
             136 $CellContext`k $CellContext`\[Mu]$$^5 + 
             408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
             408 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
             136 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^5 + 
             624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
             1248 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
             624 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
             864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
             864 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
             256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
             80 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
             240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             240 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             368 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             736 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             352 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             352 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             64 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
             160 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
             288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             288 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
             48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
             16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
             96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
             192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
             96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
             192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
             192 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
             64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
             16 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             96 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             128 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
             32 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
             64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             64 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6))^Rational[1, 2]), 
          Rational[1, 4] (2 - 
           2 $CellContext`c$$ - ($CellContext`k $CellContext`\[Gamma]$$^2 (4 - 
             4 $CellContext`c$$ + $CellContext`k (-4 + \
$CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$))^
           Rational[1, 2] - $CellContext`k (
            2 + (-2 + $CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$)), (
           1 - $CellContext`c$$) (1 - $CellContext`\[Gamma]$$), 
          1 - $CellContext`k, 
          Rational[
           1, 2] ((-4) $CellContext`k^2 - 
            32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
            96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
            128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
            64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
           12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
           16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
           8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
           8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
           8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
           96 $CellContext`k $CellContext`\[Mu]$$ + 
           192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
           96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
           152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
           152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
           48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
           64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
           64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
           72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
           308 $CellContext`k $CellContext`\[Mu]$$^2 + 
           616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
           308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
           592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
           200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
           200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
           256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 504 $CellContext`k $CellContext`\[Mu]$$^3 + 
           1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
           504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
           1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
           304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
           304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
           448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 440 $CellContext`k $CellContext`\[Mu]$$^4 + 
           880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
           440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
           1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
           1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
           768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
           224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
           224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
           384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 192 $CellContext`k $CellContext`\[Mu]$$^5 + 
           384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
           192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
           704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
           704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
           512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
           64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
           64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
           128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 32 $CellContext`k $CellContext`\[Mu]$$^6 + 
           64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
           32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
           128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
           128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
           128 $CellContext`k^3 $CellContext`\[Mu]$$^6 - ((12 $CellContext`k - 
              24 $CellContext`c$$ $CellContext`k + 
              12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
              16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
              8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
              96 $CellContext`k $CellContext`\[Mu]$$ - 
              192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
              96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
              152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
              152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
              48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
              616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
              308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 - 
              592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
              200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
              1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 + 
              504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 - 
              1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
              
              304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
              880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
              440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 - 
              1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
              224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
              384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
              192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 - 
              704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
              64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
              32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 - 
              128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
            4 ((-4) $CellContext`k^2 - 
             32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
             12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
             12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 16 $CellContext`k + 
             48 $CellContext`c$$ $CellContext`k - 
             48 $CellContext`c$$^2 $CellContext`k + 
             16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
             52 $CellContext`c$$ $CellContext`k^2 + 
             26 $CellContext`c$$^2 $CellContext`k^2 - 16 $CellContext`k^3 + 
             16 $CellContext`c$$ $CellContext`k^3 + 3 $CellContext`k^4 + 
             4 $CellContext`k $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
             16 $CellContext`\[Mu]$$ - 
             64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
             64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
             16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
             116 $CellContext`k $CellContext`\[Mu]$$ + 
             348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
             348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
             116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
             224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
             224 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$ - 
             156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
             156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
             32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
             32 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             32 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             88 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             44 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
             24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
             24 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
             36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
             32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             32 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
             72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             72 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
             40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
             136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
             204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
             136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
             34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
             336 $CellContext`k $CellContext`\[Mu]$$^2 + 
             1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
             1008 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
             336 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^2 + 
             782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             1564 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
             782 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
             624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
             624 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
             140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
             104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             312 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             196 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             392 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             28 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             28 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
             128 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
             208 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             104 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
             264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             264 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
             164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
             144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
             216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
             144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
             36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
             492 $CellContext`k $CellContext`\[Mu]$$^3 + 
             1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
             1476 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
             492 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^3 + 
             1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             2808 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
             1404 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
             1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
             1304 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
             320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
             176 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             528 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             452 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             904 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             104 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             104 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
             224 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
             352 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             176 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
             504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             504 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
             352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
             76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
             114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
             76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
             19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
             376 $CellContext`k $CellContext`\[Mu]$$^4 + 
             1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
             1128 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
             376 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^4 + 
             1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
             2688 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
             1344 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
             1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
             1488 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
             400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
             164 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             492 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             568 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             1136 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             336 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             336 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
             192 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
             328 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             164 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
             528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             528 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
             416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
             24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
             16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
             4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
             136 $CellContext`k $CellContext`\[Mu]$$^5 + 
             408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
             408 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
             136 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^5 + 
             624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
             1248 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
             624 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
             864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
             864 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
             256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
             80 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
             240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             240 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             368 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             736 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             352 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             352 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
             64 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
             160 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             80 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
             288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             288 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
             256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
             48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
             16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
             96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
             192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
             96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
             192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
             192 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
             64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
             16 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
             48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             96 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
             128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             128 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
             32 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             16 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
             64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             64 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
             64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6))^Rational[1, 2]), 
          Rational[1, 4] (2 - 
           2 $CellContext`c$$ - ($CellContext`k $CellContext`\[Gamma]$$^2 (4 - 
             4 $CellContext`c$$ + $CellContext`k (-4 + \
$CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$))^
           Rational[1, 2] - $CellContext`k (
            2 + (-2 + $CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$)), 
          Rational[
           1, 2] ((-4) $CellContext`k^2 - 
            32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
            96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
            128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
            64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
           12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
           16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
           8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
           8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
           8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
           96 $CellContext`k $CellContext`\[Mu]$$ + 
           192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
           96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
           152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
           152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
           48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
           64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
           64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
           72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
           308 $CellContext`k $CellContext`\[Mu]$$^2 + 
           616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
           308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
           592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
           232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
           200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
           
           200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
           256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 504 $CellContext`k $CellContext`\[Mu]$$^3 + 
           1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
           504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
           1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
           576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
           304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
           304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
           448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 440 $CellContext`k $CellContext`\[Mu]$$^4 + 
           880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
           440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
           1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
           1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
           768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
           224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
           224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
           384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 192 $CellContext`k $CellContext`\[Mu]$$^5 + 
           384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
           192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
           704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
           704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
           512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
           64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
           64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
           128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 32 $CellContext`k $CellContext`\[Mu]$$^6 + 
           64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
           32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
           128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
           128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
           128 $CellContext`k^3 $CellContext`\[Mu]$$^6 + ((12 $CellContext`k - 
               24 $CellContext`c$$ $CellContext`k + 
               12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
               16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
               8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
               8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ + 
               8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
               96 $CellContext`k $CellContext`\[Mu]$$ - 
               192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
               96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
               152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
               152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
               48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
               64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
               64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
               72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
               616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
               308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 - 
               592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
               592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
               232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
               200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
               200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
               256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
               1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 + 
               504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 - 
               1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
               1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
               576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
               304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
               304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
               448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
               880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
               440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 - 
               1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
               1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
               768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
               224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
               224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
               384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
               384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
               192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 - 
               704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
               704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
               512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
               64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
               64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
               128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
               64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
               32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 - 
               128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
               128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
               128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
             4 ((-4) $CellContext`k^2 - 
              32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
              96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
              128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
              64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
              12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
              12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 
              16 $CellContext`k + 48 $CellContext`c$$ $CellContext`k - 
              48 $CellContext`c$$^2 $CellContext`k + 
              16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
              52 $CellContext`c$$ $CellContext`k^2 + 
              26 $CellContext`c$$^2 $CellContext`k^2 - 16 $CellContext`k^3 + 
              16 $CellContext`c$$ $CellContext`k^3 + 3 $CellContext`k^4 + 
              4 $CellContext`k $CellContext`\[Gamma]$$ - 
              12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
              12 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
              4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
              4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
              4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
              4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
              4 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
              8 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
              4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
              16 $CellContext`\[Mu]$$ - 
              64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
              64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
              16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
              116 $CellContext`k $CellContext`\[Mu]$$ + 
              348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
              348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
              116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
              224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
              448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
              224 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$ - 
              156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
              156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
              32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
              32 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
              96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              32 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              44 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              88 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              44 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              24 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              24 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
              36 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              32 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
              72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              72 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
              136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
              136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
              34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
              336 $CellContext`k $CellContext`\[Mu]$$^2 + 
              1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
              1008 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
              336 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^2 + 
              782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
              1564 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
              782 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
              624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
              624 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
              140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
              104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              312 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              104 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              196 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              392 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              28 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              28 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
              128 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
              208 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
              104 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
              264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
              264 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
              164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
              144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
              216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
              144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
              36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
              492 $CellContext`k $CellContext`\[Mu]$$^3 + 
              1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
              1476 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
              492 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^3 + 
              1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
              2808 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
              1404 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
              1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
              1304 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
              320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
              176 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              528 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              176 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              452 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              904 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              104 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              104 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
              224 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
              352 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
              176 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
              504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
              504 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
              352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
              76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
              114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
              76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
              19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
              376 $CellContext`k $CellContext`\[Mu]$$^4 + 
              1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
              1128 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
              376 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^4 + 
              1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
              2688 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
              1344 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
              1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
              1488 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
              400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
              164 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              492 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              164 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              568 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              1136 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              336 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              336 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
              192 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
              328 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
              164 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
              528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
              528 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
              416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
              24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
              16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
              4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
              136 $CellContext`k $CellContext`\[Mu]$$^5 + 
              408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
              408 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
              136 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^5 + 
              624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
              1248 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
              624 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
              864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
              864 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
              256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
              80 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              240 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              80 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              368 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              736 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              352 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              352 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
              64 $CellContext`k^4 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 + 
              160 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
              80 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 + 
              288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 - 
              288 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
              256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
              48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
              48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
              16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
              96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
              192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
              96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
              192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
              192 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
              64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
              16 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
              48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
              48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
              16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
              96 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
              192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
              96 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
              128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
              128 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
              16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 + 
              32 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
              
              16 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 + 
              64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
              64 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6 - 
              64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^6))^Rational[1, 2]), 
          Rational[-1, 2] $CellContext`k^(-1) (
           2 (-1 + $CellContext`c$$) $CellContext`k + $CellContext`k^2 + (-1 + \
$CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
              2 $CellContext`\[Mu]$$)^(-2))}, {$CellContext`k, 0.001, 1}, 
         PlotRange -> {0, 1}, 
         PlotStyle -> {Magenta, Blue, Green, Black, Thick}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.2}, 0, 
         1}, {{$CellContext`c$$, 0.0001}, 0, 1}, {{$CellContext`\[Mu]$$, 10}, 
         0, 120}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {375., 386.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.7401152191493816`*^9, 3.740115252183812*^9}, 
   3.740115375653384*^9, 3.7403814611947117`*^9, 3.740573421875386*^9, {
   3.7405736254911776`*^9, 3.7405736443283014`*^9}, 3.740573715868679*^9, 
   3.7407411100402703`*^9, 3.740801333804023*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Preparing", " ", "relevant", " ", "boundaries"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"F1m", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"%", "==", "dTestTwoPart2"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"kswitchTest", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{"%", ",", "k"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.7405744630377607`*^9, 3.740574476014289*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Figure", " ", "2", " ", "in", " ", "the", " ", "paper", " ", "in", " ", 
    "Manipulate", " ", "command"}], "*)"}], "\[IndentingNewLine]", 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "Next", " ", "two", " ", "are", " ", "used", " ", "to", " ", "fill", " ", 
    "the", " ", "gray", " ", "areas"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Max", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Piecewise", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"dTestTwoPart2", " ", ",", 
           RowBox[{"k", "<", "kswitchTest"}]}], "}"}], ",", 
         RowBox[{"{", " ", 
          RowBox[{"dTESTconstr", ",", 
           RowBox[{"k", ">", "kswitchTest"}]}], "}"}]}], "}"}], "]"}], ",", 
      "\[IndentingNewLine]", 
      RowBox[{"Piecewise", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"dWelfaremix", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
           RowBox[{
            RowBox[{"dWelfaremix", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
            "dkswitchmix"}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Re", "[", " ", 
            RowBox[{"dWelfPure", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
           RowBox[{
            RowBox[{
             RowBox[{"dWelfaremix", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
             "dkswitchmix"}], "&&", 
            RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"1", "-", "c", "-", "k"}], ",", 
           RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}]}], "]"}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Min", "[", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"Piecewise", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"dTestTwoPart2", " ", ",", 
           RowBox[{"k", "<", "kswitchTest"}]}], "}"}], ",", 
         RowBox[{"{", " ", 
          RowBox[{"dTESTconstr", ",", 
           RowBox[{"k", ">", "kswitchTest"}]}], "}"}]}], "}"}], "]"}], ",", 
      "\[IndentingNewLine]", 
      RowBox[{"Piecewise", "[", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"dWelfaremix", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
           RowBox[{
            RowBox[{"dWelfaremix", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
            "dkswitchmix"}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Re", "[", " ", 
            RowBox[{"dWelfPure", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
           RowBox[{
            RowBox[{
             RowBox[{"dWelfaremix", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
             "dkswitchmix"}], "&&", 
            RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"1", "-", "c", "-", "k"}], ",", 
           RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}]}], "]"}], 
    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"These", " ", "are", " ", "the", " ", "boundaries"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Min", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", "c"}], ")"}], 
       RowBox[{"(", 
        RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", 
      RowBox[{"1", "-", "c", "-", "k"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Piecewise", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"dTestTwoPart2", " ", ",", 
         RowBox[{"k", "<", "kswitchTest"}]}], "}"}], ",", 
       RowBox[{"{", " ", 
        RowBox[{"dTESTconstr", ",", 
         RowBox[{"k", ">", "kswitchTest"}]}], "}"}]}], "}"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Piecewise", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"dWelfaremix", "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
         RowBox[{
          RowBox[{"dWelfaremix", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
          "dkswitchmix"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"Re", "[", " ", 
          RowBox[{"dWelfPure", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
         RowBox[{
          RowBox[{
           RowBox[{"dWelfaremix", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
           "dkswitchmix"}], "&&", 
          RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"Null", ",", 
         RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", "Plotting", "*)"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Quiet", "[", 
      RowBox[{"Plot", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"%", ",", "%%", ",", "%%%", ",", "%%%%", ",", "%%%%%"}], 
         "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"k", ",", "0.001", ",", "1"}], "}"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"0", ",", "1"}], "}"}]}], ",", 
        RowBox[{"AxesLabel", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"K", ",", "\[CapitalDelta]"}], "}"}]}], ",", 
        RowBox[{"PlotStyle", "\[Rule]", 
         RowBox[{"{", " ", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{"Black", ",", "Thick"}], "}"}], ",", 
           RowBox[{"{", "Black", "}"}], ",", "Black", ",", "Black", ",", 
           "Black"}], "}"}]}], ",", "\[IndentingNewLine]", 
        RowBox[{"Filling", "->", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"4", "\[Rule]", "Axis"}], ",", 
           RowBox[{"5", "\[Rule]", 
            RowBox[{"{", "3", "}"}]}]}], "}"}]}], ",", "\[IndentingNewLine]", 
        RowBox[{"FillingStyle", "\[Rule]", 
         RowBox[{"{", "Gray", "}"}]}]}], "\[IndentingNewLine]", "]"}], "]"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.2"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"c", ",", "0.0001"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "10"}], "}"}], ",", "0", ",", "150"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7405736850306034`*^9, 3.7405736865285892`*^9}, {
   3.74057382277913*^9, 3.7405740197241726`*^9}, 3.740574439664568*^9, {
   3.740574657834087*^9, 3.740574719072032*^9}, {3.7405747492252617`*^9, 
   3.7405747923520174`*^9}, {3.740574888451724*^9, 3.740575181955693*^9}, {
   3.740575232115158*^9, 3.740575237294941*^9}, 3.740575382791093*^9, {
   3.7406768234050016`*^9, 3.7406768235318184`*^9}, 3.7407227821756887`*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0.0001, $CellContext`\[Gamma]$$ = 
    0.2, $CellContext`\[Mu]$$ = 1.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.2}, 0, 1}, {{
       Hold[$CellContext`c$$], 0.0001}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 10}, 0, 150}}, Typeset`size$$ = {
    720., {228., 248.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$264482$$ = 
    0, $CellContext`c$264483$$ = 0, $CellContext`\[Mu]$264484$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0.0001, $CellContext`\[Gamma]$$ = 
        0.2, $CellContext`\[Mu]$$ = 10}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$264482$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$264483$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$264484$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Quiet[
        Plot[{
          
          Piecewise[{{
            Rational[-1, 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
               1 + $CellContext`\[Mu]$$)^(-1) (1 + 
               2 $CellContext`\[Mu]$$)^(-3) (
              4 $CellContext`k $CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
              4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
              4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
              2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
              
              2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
              4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
              30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
              30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
              10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
              5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 28 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
              28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
              12 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
              12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
              7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$ - 
              30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
              84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
              18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
              9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
              72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
              72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
              12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
              30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
              30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
              21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
              84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
              2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
              104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
              14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
              7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
              80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
              80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
              24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
              38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
              38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
              31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 
              104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
              8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
              48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
              4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
              32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
              32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
              16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
              20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
              20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
              18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
              48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
              8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                Rational[
                 1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                  2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                 4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                 8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                   2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                 4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                  63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                  511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                  257 $CellContext`\[Mu]$$^6) - 
                 
                 4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                  4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                  22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                  3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2] $CellContext`\[Mu]$$ + 
                  3 $CellContext`\[Mu]$$^2 + 
                  40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                  3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                  24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                   Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                   2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                   4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                   2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                   2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                  18 $CellContext`\[Mu]$$ - (65 + 
                   4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                  12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                  3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                  2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                   4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                  4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                   148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                  2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                   16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                  3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
               Rational[1, 2]), 
             Rational[-1, 
                4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                2 $CellContext`\[Mu]$$)^(-3) (
               4 $CellContext`k $CellContext`\[Gamma]$$ - 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
               4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
               2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
               4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
               30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
               28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               12 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$ - 
               30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
               84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
               9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
               72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
               12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
               84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
               14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
               7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
               80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
               24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
               104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
               16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
               48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                 Rational[
                  1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                  4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                  8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                  4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                   63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                   511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                   257 $CellContext`\[Mu]$$^6) - 
                  
                  4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                   4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                   22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                   3 $CellContext`\[Mu]$$^2 + 
                   40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                   24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                   18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                   12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                   3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                   2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                   4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                   2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                   3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                Rational[1, 2]) < -$CellContext`\[Gamma]$$^(-1) (
               1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                3 $CellContext`\[Mu]$$ + 
                2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                 2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                 Rational[1, 2]) (1 + 
                2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$))}, {
            Rational[1, 2] 
             Re[(-1 - 6 $CellContext`\[Mu]$$ + 
                 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 13 $CellContext`\[Mu]$$^2 + 
                 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 12 $CellContext`\[Mu]$$^3 + 
                 8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`\[Mu]$$^4 + 
                 3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) (-2 + 
                2 $CellContext`c$$ + 2 $CellContext`k + 
                2 $CellContext`\[Gamma]$$ - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
                2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
                12 $CellContext`\[Mu]$$ + 
                12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                16 $CellContext`k $CellContext`\[Mu]$$ + 
                8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                8 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                26 $CellContext`\[Mu]$$^2 + 
                26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                48 $CellContext`k $CellContext`\[Mu]$$^2 + 
                10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                10 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                52 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                24 $CellContext`\[Mu]$$^3 + 
                24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                64 $CellContext`k $CellContext`\[Mu]$$^3 + 
                4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                16 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                32 $CellContext`k $CellContext`\[Mu]$$^4 + 
                6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                48 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                18 $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^4 - 
                2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 - ((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 
                   2 $CellContext`\[Gamma]$$ + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                   2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                   12 $CellContext`\[Mu]$$ - 
                   12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   16 $CellContext`k $CellContext`\[Mu]$$ - 
                   8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   26 $CellContext`\[Mu]$$^2 - 
                   26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                   10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                   52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 + 
                   24 $CellContext`\[Mu]$$^3 - 
                   24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                   80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 - 
                   16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                   32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                   6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                   48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 - 
                   18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 + 
                   2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\
\[Mu]$$^4)^2 - 4 (-1 - 6 $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  13 $CellContext`\[Mu]$$^2 + 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  12 $CellContext`\[Mu]$$^3 + 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Mu]$$^4 + 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
                  4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 
                  2 $CellContext`k - 
                  2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
                  2 $CellContext`\[Gamma]$$ - 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                  2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
                  2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                  2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^2 - 12 $CellContext`\[Mu]$$ + 
                  24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                  12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
                  16 $CellContext`k $CellContext`\[Mu]$$ - 
                  16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                  8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                  8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 
                  16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 26 $CellContext`\[Mu]$$^2 + 
                  52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                  26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
                  48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                  48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                  24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                  10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                  14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                  52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                  52 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 
                  2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                  4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                  4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$^2 - 
                  2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
                  48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                  24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
                  64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                  64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                  32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                  4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                  16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                  80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                  80 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                  4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                  16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                  16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                  16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                  8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
                  32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                  32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                  16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                  6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                  48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                  48 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                  2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                  18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                  18 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
                  9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + 
                  2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 + $CellContext`k^2 $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])], 
             And[
             Rational[-1, 
                 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                 1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                 2 $CellContext`\[Mu]$$)^(-3) (
                4 $CellContext`k $CellContext`\[Gamma]$$ - 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
                4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
                
                2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
                4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
                30 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
                28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
                2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
                12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
                7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$ - 
                30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
                84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                  Rational[
                   1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                    2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                   4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                   8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                   4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                    63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                    511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                    257 $CellContext`\[Mu]$$^6) - 
                   
                   4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                    4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                    22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                    3 $CellContext`\[Mu]$$^2 + 
                    40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                    24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                    18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                    3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                    2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                    4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                    2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                    3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                 Rational[1, 2]) > -$CellContext`\[Gamma]$$^(-1) (
                1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                 3 $CellContext`\[Mu]$$ + 
                 2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                  2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) (1 + 
                 2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$)), $CellContext`k <= 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 11 $CellContext`\[Mu]$$^2 + 
                 19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 20 $CellContext`\[Mu]$$^3 + 
                 32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                 12 $CellContext`\[Mu]$$^4 + 
                 21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                  10 $CellContext`\[Mu]$$^2 + 
                  10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                    8 $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    10 $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4)^2 - 
                 4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                  6 $CellContext`\[Mu]$$ - 
                  12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                  6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  13 $CellContext`\[Mu]$$^2 - 
                  26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                  13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                  7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                  24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                  12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                  8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                  4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                  3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  11 $CellContext`\[Mu]$$^2 + 
                  19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`\[Mu]$$^3 + 
                  32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  12 $CellContext`\[Mu]$$^4 + 
                  21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  
                  9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])]}, {
            Null, $CellContext`k > 
             Rational[
               1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                11 $CellContext`\[Mu]$$^2 + 
                19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                20 $CellContext`\[Mu]$$^3 + 
                32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                12 $CellContext`\[Mu]$$^4 + 
                21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                 8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                 10 $CellContext`\[Mu]$$^2 + 
                 10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                 4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                   8 $CellContext`\[Mu]$$ + 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   10 $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4)^2 - 4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                 6 $CellContext`\[Mu]$$ - 
                 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                 6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                 13 $CellContext`\[Mu]$$^2 - 
                 26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                 13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                 14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                 24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                 12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                 16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                 8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                 4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                 3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                 6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 11 $CellContext`\[Mu]$$^2 + 
                 19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 20 $CellContext`\[Mu]$$^3 + 
                 32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                 12 $CellContext`\[Mu]$$^4 + 
                 21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 
                 9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])}}, 0], 
          
          Piecewise[{{
            Rational[
              1, 2] ((-4) $CellContext`k^2 - 
               32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
               96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
               128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
               64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
              12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
              16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
              8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
              8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
              8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
              96 $CellContext`k $CellContext`\[Mu]$$ + 
              192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
              96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
              152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
              152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
              48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
              72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 308 $CellContext`k $CellContext`\[Mu]$$^2 + 
              616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
              308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
              592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
              592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
              232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
              200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
              256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 504 $CellContext`k $CellContext`\[Mu]$$^3 + 
              1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
              504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
              1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
              1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
              576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
              304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
              448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 440 $CellContext`k $CellContext`\[Mu]$$^4 + 
              880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
              440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
              1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
              1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
              768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
              224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
              384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 192 $CellContext`k $CellContext`\[Mu]$$^5 + 
              384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
              192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
              704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
              704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
              512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
              64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
              128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 32 $CellContext`k $CellContext`\[Mu]$$^6 + 
              64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
              32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
              128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
              128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
              128 $CellContext`k^3 $CellContext`\[Mu]$$^6 + ((
                  12 $CellContext`k - 24 $CellContext`c$$ $CellContext`k + 
                  12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
                  16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
                  8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                  8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                  8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                  96 $CellContext`k $CellContext`\[Mu]$$ - 
                  192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
                  96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
                  152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                  152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
                  48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
                  64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                  64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
                  616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
                  308 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^2 - 592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                  592 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^2 + 232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
                  200 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  200 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                  256 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
                  1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 + 
                  504 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^3 - 1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                  1200 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^3 + 576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
                  304 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                  304 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                  448 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
                  880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
                  440 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^4 - 1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                  1312 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^4 + 768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
                  224 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 
                  224 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                  384 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
                  384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
                  192 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^5 - 704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
                  704 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^5 + 512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
                  64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 
                  64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                  128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
                  64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
                  32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 - 
                  128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
                  128 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^6 + 128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
                4 ((-4) $CellContext`k^2 - 
                 32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                 96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                 128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                 64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
                 12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
                 12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 
                 16 $CellContext`k + 48 $CellContext`c$$ $CellContext`k - 
                 48 $CellContext`c$$^2 $CellContext`k + 
                 16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
                 52 $CellContext`c$$ $CellContext`k^2 + 
                 26 $CellContext`c$$^2 $CellContext`k^2 - 16 $CellContext`k^3 + 
                 16 $CellContext`c$$ $CellContext`k^3 + 3 $CellContext`k^4 + 
                 4 $CellContext`k $CellContext`\[Gamma]$$ - 
                 12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
                 12 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
                 4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
                 4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                 8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
                 4 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ - 4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                 4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                 4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
                 4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
                 8 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 - 
                 4 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 + 8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
                 8 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 - 4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
                 16 $CellContext`\[Mu]$$ - 
                 64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                 96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                 64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
                 16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
                 116 $CellContext`k $CellContext`\[Mu]$$ + 
                 348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                 348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
                 116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
                 224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                 448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
                 224 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                 156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
                 156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
                 32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
                 32 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                 96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
                 96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                 32 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                 44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                 88 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                 44 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                 24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                 24 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
                 36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                 64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 32 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                 72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 
                 72 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
                 136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                 204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                 136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
                 34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
                 336 $CellContext`k $CellContext`\[Mu]$$^2 + 
                 1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                 1008 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^2 + 
                 336 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^2 + 
                 782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                 1564 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^2 + 
                 782 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^2 - 624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
                 624 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
                 140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
                 104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                 312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
                 312 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                 104 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                 196 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                 392 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                 196 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                 28 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                 28 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
                 128 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 
                 104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                 208 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 104 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                 264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 264 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
                 144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                 216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                 144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
                 36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
                 492 $CellContext`k $CellContext`\[Mu]$$^3 + 
                 1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                 1476 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^3 + 
                 492 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^3 + 
                 1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                 2808 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^3 + 
                 1404 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^3 - 1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
                 1304 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^3 + 320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
                 176 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                 528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
                 528 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                 176 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                 452 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                 904 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                 452 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                 104 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                 104 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                 224 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                 176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                 352 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 176 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                 504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 504 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
                 76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                 114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                 76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
                 19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
                 376 $CellContext`k $CellContext`\[Mu]$$^4 + 
                 1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                 1128 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^4 + 
                 376 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^4 + 
                 1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
                 2688 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^4 + 
                 1344 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^4 - 1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
                 1488 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^4 + 400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
                 164 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                 492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
                 492 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                 164 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                 568 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 
                 1136 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                 568 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                 336 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                 336 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                 192 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                 164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                 328 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 164 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                 528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 528 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
                 16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
                 24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
                 16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
                 4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
                 136 $CellContext`k $CellContext`\[Mu]$$^5 + 
                 408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
                 408 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
                 136 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^5 + 
                 624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
                 1248 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^5 + 
                 624 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^5 - 864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
                 864 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
                 256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
                 80 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
                 240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
                 240 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                 80 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
                 368 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 
                 736 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                 368 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                 352 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 - 
                 352 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                 64 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 - 
                 80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 + 
                 160 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 - 
                 80 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 + 
                 288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 - 
                 288 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 - 
                 256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
                 48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
                 48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
                 16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
                 96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
                 192 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
                 96 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^6 - 192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
                 192 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
                 64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
                 16 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
                 48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
                 48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
                 16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
                 96 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^6 + 
                 192 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                 96 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 + 
                 128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^6 - 
                 128 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                 16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6 + 
                 32 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 - 
                 16 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 + 
                 64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6 - 
                 64 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 - 
                 64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6))^Rational[1, 2]), $CellContext`k < 
             Rational[
               1, 2] ($CellContext`\[Gamma]$$ + 
                4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2)^(-1) (
               1 - $CellContext`c$$ + $CellContext`\[Gamma]$$ - \
$CellContext`c$$ $CellContext`\[Gamma]$$ + 4 $CellContext`\[Mu]$$ - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
               3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
               3 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Mu]$$^2 - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
               2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + (-1 + $CellContext`c$$) (1 + 
                 2 $CellContext`\[Mu]$$) (1 - 
                  2 $CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2 + 
                  4 $CellContext`\[Mu]$$ - 
                  2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  4 $CellContext`\[Mu]$$^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2)^Rational[1, 2])}, {
            Rational[1, 4] (2 - 
              2 $CellContext`c$$ - ($CellContext`k $CellContext`\[Gamma]$$^2 (
                4 - 4 $CellContext`c$$ + $CellContext`k (-4 + $CellContext`\
\[Gamma]$$) $CellContext`\[Gamma]$$))^
              Rational[1, 2] - $CellContext`k (
               2 + (-2 + $CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$)), \
$CellContext`k > 
             Rational[
               1, 2] ($CellContext`\[Gamma]$$ + 
                4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2)^(-1) (
               1 - $CellContext`c$$ + $CellContext`\[Gamma]$$ - \
$CellContext`c$$ $CellContext`\[Gamma]$$ + 4 $CellContext`\[Mu]$$ - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
               3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
               3 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Mu]$$^2 - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
               2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + (-1 + $CellContext`c$$) (1 + 
                 2 $CellContext`\[Mu]$$) (1 - 
                  2 $CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2 + 
                  4 $CellContext`\[Mu]$$ - 
                  2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  4 $CellContext`\[Mu]$$^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2)^Rational[1, 2])}}, 0], 
          Min[
          1 - $CellContext`c$$ - $CellContext`k, (1 - $CellContext`c$$) (
            1 - $CellContext`\[Gamma]$$)], 
          Min[
           
           Piecewise[{{
             Rational[
               1, 2] ((-4) $CellContext`k^2 - 
                32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
               12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
               16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
               8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
               8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
               8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
               96 $CellContext`k $CellContext`\[Mu]$$ + 
               192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
               96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
               152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
               152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
               48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
               64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
               64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
               72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 308 $CellContext`k $CellContext`\[Mu]$$^2 + 
               616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
               308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
               592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
               592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
               232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
               200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 504 $CellContext`k $CellContext`\[Mu]$$^3 + 
               1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
               504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
               1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
               1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
               576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
               304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 440 $CellContext`k $CellContext`\[Mu]$$^4 + 
               880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
               440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
               1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
               1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
               768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
               224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 192 $CellContext`k $CellContext`\[Mu]$$^5 + 
               384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
               192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
               704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
               704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
               512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
               64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
               64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
               
               128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 32 $CellContext`k $CellContext`\[Mu]$$^6 + 
               64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
               32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
               128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
               128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
               128 $CellContext`k^3 $CellContext`\[Mu]$$^6 + ((
                   12 $CellContext`k - 24 $CellContext`c$$ $CellContext`k + 
                   12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
                   16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
                   8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                   8 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ + 8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                   96 $CellContext`k $CellContext`\[Mu]$$ - 
                   192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
                   96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
                   152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                   152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
                   48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
                   64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                   64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
                   616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
                   308 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^2 - 592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                   592 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^2 + 232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
                   200 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                   200 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                   256 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
                   1008 $CellContext`c$$ $CellContext`k \
$CellContext`\[Mu]$$^3 + 
                   504 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^3 - 1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                   1200 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^3 + 576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
                   304 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                   304 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                   448 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
                   880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
                   440 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^4 - 1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                   1312 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^4 + 768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
                   224 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 
                   224 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                   384 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
                   384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
                   192 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^5 - 704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
                   704 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^5 + 512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
                   64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 
                   64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                   128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
                   64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
                   32 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^6 - 128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
                   128 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^6 + 128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
                 4 ((-4) $CellContext`k^2 - 
                  32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                  96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                  128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                  64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
                  12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
                  12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 
                  16 $CellContext`k + 48 $CellContext`c$$ $CellContext`k - 
                  48 $CellContext`c$$^2 $CellContext`k + 
                  16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
                  52 $CellContext`c$$ $CellContext`k^2 + 
                  26 $CellContext`c$$^2 $CellContext`k^2 - 
                  16 $CellContext`k^3 + 16 $CellContext`c$$ $CellContext`k^3 + 
                  3 $CellContext`k^4 + 
                  4 $CellContext`k $CellContext`\[Gamma]$$ - 
                  12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
                  12 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ - 
                  4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
                  4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                  8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
                  4 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ - 4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                  4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                  4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
                  4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
                  8 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 - 
                  4 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 + 8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
                  8 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 - 4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
                  16 $CellContext`\[Mu]$$ - 
                  64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                  96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                  64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
                  16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
                  116 $CellContext`k $CellContext`\[Mu]$$ + 
                  348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                  348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
                  116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
                  224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                  448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
                  224 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$ - 156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
                  156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
                  32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
                  32 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                  96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
                  96 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  32 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                  88 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  44 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                  24 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  32 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 
                  72 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
                  136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                  204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                  136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
                  34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
                  336 $CellContext`k $CellContext`\[Mu]$$^2 + 
                  1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                  1008 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^2 + 
                  336 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^2 + 782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                  1564 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^2 + 
                  782 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^2 - 624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
                  624 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^2 + 140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
                  104 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 
                  312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
                  312 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  104 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  196 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  392 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  28 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  28 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                  128 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 
                  104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                  208 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  104 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                  264 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
                  144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                  216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                  144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
                  36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
                  492 $CellContext`k $CellContext`\[Mu]$$^3 + 
                  1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                  1476 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^3 + 
                  492 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^3 + 1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                  2808 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^3 + 
                  1404 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^3 - 1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
                  1304 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^3 + 320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
                  176 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                  528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
                  528 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  176 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  452 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                  904 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                  104 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                  104 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                  224 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                  176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                  352 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  176 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                  504 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
                  76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                  114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                  76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
                  19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
                  376 $CellContext`k $CellContext`\[Mu]$$^4 + 
                  1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                  1128 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^4 + 
                  376 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^4 + 1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
                  2688 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^4 + 
                  1344 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^4 - 1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
                  1488 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^4 + 400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
                  164 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                  492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
                  492 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                  164 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                  568 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 
                  1136 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                  568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                  336 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                  336 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                  192 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                  164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                  328 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  164 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                  528 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
                  16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
                  24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
                  16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
                  4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
                  136 $CellContext`k $CellContext`\[Mu]$$^5 + 
                  408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
                  408 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^5 + 
                  136 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^5 + 624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
                  1248 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^5 + 
                  624 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^5 - 864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
                  864 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^5 + 256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
                  80 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
                  240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
                  240 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                  80 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                  368 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 
                  736 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                  368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                  352 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 - 
                  352 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                  64 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 - 
                  80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 + 
                  160 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 - 
                  80 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 + 
                  288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
                  288 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 - 
                  256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
                  48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
                  48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
                  16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
                  96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
                  192 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^6 + 
                  96 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^6 - 192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
                  192 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^6 + 64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
                  16 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
                  48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
                  48 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  16 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  96 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^6 + 
                  192 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  96 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 + 
                  128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^6 - 
                  128 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6 + 
                  32 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 - 
                  16 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 + 
                  64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6 - 
                  64 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 - 
                  64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6))^Rational[1, 2]), $CellContext`k < 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2)^(-1) (
                1 - $CellContext`c$$ + $CellContext`\[Gamma]$$ - \
$CellContext`c$$ $CellContext`\[Gamma]$$ + 4 $CellContext`\[Mu]$$ - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                3 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Mu]$$^2 - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + (-1 + $CellContext`c$$) (1 + 
                  2 $CellContext`\[Mu]$$) (1 - 
                   2 $CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2 + 
                   4 $CellContext`\[Mu]$$ - 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`\[Mu]$$^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2)^Rational[1, 2])}, {
             Rational[1, 4] (2 - 
               2 $CellContext`c$$ - ($CellContext`k $CellContext`\[Gamma]$$^2 \
(4 - 4 $CellContext`c$$ + $CellContext`k (-4 + $CellContext`\[Gamma]$$) \
$CellContext`\[Gamma]$$))^
               Rational[1, 2] - $CellContext`k (
                2 + (-2 + $CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$)), \
$CellContext`k > 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2)^(-1) (
                1 - $CellContext`c$$ + $CellContext`\[Gamma]$$ - \
$CellContext`c$$ $CellContext`\[Gamma]$$ + 4 $CellContext`\[Mu]$$ - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                
                3 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Mu]$$^2 - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + (-1 + $CellContext`c$$) (1 + 
                  2 $CellContext`\[Mu]$$) (1 - 
                   2 $CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2 + 
                   4 $CellContext`\[Mu]$$ - 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`\[Mu]$$^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2)^Rational[1, 2])}}, 0], 
           
           Piecewise[{{
             Rational[-1, 
                4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                2 $CellContext`\[Mu]$$)^(-3) (
               4 $CellContext`k $CellContext`\[Gamma]$$ - 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
               4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
               2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
               4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
               30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
               28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               12 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$ - 
               30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
               84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
               9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
               72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
               12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
               84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
               
               14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
               7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
               80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
               24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
               104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
               16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
               48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                 Rational[
                  1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                  4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                  8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                  4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                   63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                   511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                   257 $CellContext`\[Mu]$$^6) - 
                  4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                   4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                   22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                   3 $CellContext`\[Mu]$$^2 + 
                   40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                   24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                   18 $CellContext`\[Mu]$$ - (65 + 
                    
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                   12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                   3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                   2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                   4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                   2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                   3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                Rational[1, 2]), 
              Rational[-1, 
                 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                 1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                 2 $CellContext`\[Mu]$$)^(-3) (
                4 $CellContext`k $CellContext`\[Gamma]$$ - 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
                4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
                2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
                4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
                30 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
                28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
                2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
                12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
                7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$ - 
                30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
                84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                  Rational[
                   1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                    2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                   4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                   8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                   4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                    63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                    511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                    257 $CellContext`\[Mu]$$^6) - 
                   4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                    4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                    22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                    3 $CellContext`\[Mu]$$^2 + 
                    40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                    24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                    18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                    3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                    2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                    4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                    2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                    3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                 Rational[1, 2]) < -$CellContext`\[Gamma]$$^(-1) (
                1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                 3 $CellContext`\[Mu]$$ + 
                 2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                  2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) (1 + 
                 2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$))}, {
             Rational[1, 2] 
              Re[(-1 - 6 $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  13 $CellContext`\[Mu]$$^2 + 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  12 $CellContext`\[Mu]$$^3 + 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Mu]$$^4 + 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) \
(-2 + 2 $CellContext`c$$ + 2 $CellContext`k + 2 $CellContext`\[Gamma]$$ - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
                 2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
                 12 $CellContext`\[Mu]$$ + 
                 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                 16 $CellContext`k $CellContext`\[Mu]$$ + 
                 8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                 8 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 26 $CellContext`\[Mu]$$^2 + 
                 26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                 48 $CellContext`k $CellContext`\[Mu]$$^2 + 
                 10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                 10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 24 $CellContext`\[Mu]$$^3 + 
                 24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                 64 $CellContext`k $CellContext`\[Mu]$$^3 + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                 16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                 8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                 32 $CellContext`k $CellContext`\[Mu]$$^4 + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                 18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                 2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 - ((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 
                    2 $CellContext`\[Gamma]$$ + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                    2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                    12 $CellContext`\[Mu]$$ - 
                    12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    16 $CellContext`k $CellContext`\[Mu]$$ - 
                    8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
                    16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 26 $CellContext`\[Mu]$$^2 - 
                    26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                    10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                    52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 - 
                    4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 + 24 $CellContext`\[Mu]$$^3 - 
                    24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                    80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 - 
                    16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                    32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                    6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                    48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 - 
                    18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 + 
                    2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\
\[Mu]$$^4)^2 - 4 (-1 - 6 $CellContext`\[Mu]$$ + 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   13 $CellContext`\[Mu]$$^2 + 
                   7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                   12 $CellContext`\[Mu]$$^3 + 
                   8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Mu]$$^4 + 
                   3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
                   4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 
                   2 $CellContext`k - 
                   2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
                   2 $CellContext`\[Gamma]$$ - 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                   2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
                   2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                   2 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 + $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
                   12 $CellContext`\[Mu]$$ + 
                   24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
                   16 $CellContext`k $CellContext`\[Mu]$$ - 
                   16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                   8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                   8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                   16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 
                   16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 26 $CellContext`\[Mu]$$^2 + 
                   52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
                   48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                   48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                   24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                   20 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                   10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                   28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                   14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                   52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                   52 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 
                   2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                   4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                   4 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
                   48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
                   64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                   64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                   32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                   4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                   32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                   16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                   80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                   80 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                   4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                   16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                   16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                   16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                   8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
                   32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                   32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                   16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                   6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                   12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                   6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                   48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                   48 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                   2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                   18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                   18 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
                   9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + $CellContext`k^2 \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])], 
              And[
              Rational[-1, 
                  4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                  1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                  2 $CellContext`\[Mu]$$)^(-3) (
                 4 $CellContext`k $CellContext`\[Gamma]$$ - 
                 4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
                 4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                 4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
                 2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
                 2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
                 4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
                 30 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                 30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 28 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 
                 28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
                 2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
                 12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
                 7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$ - 
                 30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
                 84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                 84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                 9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 72 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                 72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                 12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 30 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 
                 30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                 21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                 84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                 2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                 104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                 104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                 7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                 80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                 24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 38 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                 38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                 31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                 104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                 8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                 48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                 48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 32 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                 32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                 16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 20 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                 20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                 18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                 48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
                 8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                   Rational[
                    1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                    2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                    4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 \
$CellContext`\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                    8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                    4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                    63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                    511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                    257 $CellContext`\[Mu]$$^6) - 
                    4 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                    4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                    22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                    3 $CellContext`\[Mu]$$^2 + 
                    40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                    24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                    18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                    3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                    2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                    4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                    2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                    3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                  Rational[1, 2]) > -$CellContext`\[Gamma]$$^(-1) (
                 1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                  3 $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                   2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2]) (1 + 
                  2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$)), $CellContext`k <= 
               Rational[
                 1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  11 $CellContext`\[Mu]$$^2 + 
                  19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`\[Mu]$$^3 + 
                  32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  12 $CellContext`\[Mu]$$^4 + 
                  21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   10 $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                    8 $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    10 $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4)^2 - 
                  4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                   6 $CellContext`\[Mu]$$ - 
                   12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                   6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   13 $CellContext`\[Mu]$$^2 - 
                   26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                   13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                   7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                   7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                   24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                   12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                   8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                   4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                   3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                   3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                   6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   11 $CellContext`\[Mu]$$^2 + 
                   19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                   20 $CellContext`\[Mu]$$^3 + 
                   32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                   12 $CellContext`\[Mu]$$^4 + 
                   21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                   9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])]}, {
             1 - $CellContext`c$$ - $CellContext`k, $CellContext`k > 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 11 $CellContext`\[Mu]$$^2 + 
                 19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 20 $CellContext`\[Mu]$$^3 + 
                 32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                 12 $CellContext`\[Mu]$$^4 + 
                 21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                  10 $CellContext`\[Mu]$$^2 + 
                  10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                    8 $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    10 $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4)^2 - 
                 4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                  6 $CellContext`\[Mu]$$ - 
                  12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                  6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  13 $CellContext`\[Mu]$$^2 - 
                  26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                  13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                  7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                  24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                  12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                  8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                  4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                  3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  11 $CellContext`\[Mu]$$^2 + 
                  19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`\[Mu]$$^3 + 
                  32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  12 $CellContext`\[Mu]$$^4 + 
                  21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])}}, 0]], 
          Max[
           
           Piecewise[{{
             Rational[
               1, 2] ((-4) $CellContext`k^2 - 
                32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                64 $CellContext`k^2 $CellContext`\[Mu]$$^4)^(-1) ((-12) \
$CellContext`k + 24 $CellContext`c$$ $CellContext`k - 
               12 $CellContext`c$$^2 $CellContext`k + 16 $CellContext`k^2 - 
               16 $CellContext`c$$ $CellContext`k^2 - 4 $CellContext`k^3 + 
               8 $CellContext`k^2 $CellContext`\[Gamma]$$ - 
               8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
               8 $CellContext`k^3 $CellContext`\[Gamma]$$ - 
               96 $CellContext`k $CellContext`\[Mu]$$ + 
               192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
               96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
               152 $CellContext`k^2 $CellContext`\[Mu]$$ - 
               152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ - 
               48 $CellContext`k^3 $CellContext`\[Mu]$$ + 
               64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
               64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
               72 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 308 $CellContext`k $CellContext`\[Mu]$$^2 + 
               616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
               308 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^2 + 
               592 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
               592 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
               232 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
               200 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               256 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 504 $CellContext`k $CellContext`\[Mu]$$^3 + 
               1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
               504 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^3 + 
               1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
               1200 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
               576 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
               304 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               304 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               448 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 440 $CellContext`k $CellContext`\[Mu]$$^4 + 
               880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
               440 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^4 + 
               1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
               1312 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
               768 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
               224 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               224 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               384 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 192 $CellContext`k $CellContext`\[Mu]$$^5 + 
               384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
               192 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^5 + 
               704 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
               704 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
               512 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
               64 $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
               64 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
               128 $CellContext`k^3 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 32 $CellContext`k $CellContext`\[Mu]$$^6 + 
               64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
               32 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
               128 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
               128 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
               128 $CellContext`k^3 $CellContext`\[Mu]$$^6 + ((
                   12 $CellContext`k - 24 $CellContext`c$$ $CellContext`k + 
                   12 $CellContext`c$$^2 $CellContext`k - 16 $CellContext`k^2 + 
                   16 $CellContext`c$$ $CellContext`k^2 + 4 $CellContext`k^3 - 
                   8 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                   8 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ + 8 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                   96 $CellContext`k $CellContext`\[Mu]$$ - 
                   192 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ + 
                   96 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ - 
                   152 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                   152 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
                   48 $CellContext`k^3 $CellContext`\[Mu]$$ - 
                   64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                   64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   72 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 308 $CellContext`k $CellContext`\[Mu]$$^2 - 
                   616 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 + 
                   308 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^2 - 592 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                   592 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^2 + 232 $CellContext`k^3 $CellContext`\[Mu]$$^2 - 
                   200 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                   200 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                   256 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 504 $CellContext`k $CellContext`\[Mu]$$^3 - 
                   1008 $CellContext`c$$ $CellContext`k \
$CellContext`\[Mu]$$^3 + 
                   504 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^3 - 1200 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                   1200 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^3 + 576 $CellContext`k^3 $CellContext`\[Mu]$$^3 - 
                   304 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                   304 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                   448 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 440 $CellContext`k $CellContext`\[Mu]$$^4 - 
                   880 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 + 
                   440 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^4 - 1312 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                   1312 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^4 + 768 $CellContext`k^3 $CellContext`\[Mu]$$^4 - 
                   224 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 
                   224 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                   384 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 192 $CellContext`k $CellContext`\[Mu]$$^5 - 
                   384 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 + 
                   
                   192 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^5 - 704 $CellContext`k^2 $CellContext`\[Mu]$$^5 + 
                   704 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^5 + 512 $CellContext`k^3 $CellContext`\[Mu]$$^5 - 
                   64 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 
                   64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                   128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 32 $CellContext`k $CellContext`\[Mu]$$^6 - 
                   64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 + 
                   32 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^6 - 128 $CellContext`k^2 $CellContext`\[Mu]$$^6 + 
                   128 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^6 + 128 $CellContext`k^3 $CellContext`\[Mu]$$^6)^2 - 
                 4 ((-4) $CellContext`k^2 - 
                  32 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                  96 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                  128 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                  64 $CellContext`k^2 $CellContext`\[Mu]$$^4) (3 - 
                  12 $CellContext`c$$ + 18 $CellContext`c$$^2 - 
                  12 $CellContext`c$$^3 + 3 $CellContext`c$$^4 - 
                  16 $CellContext`k + 48 $CellContext`c$$ $CellContext`k - 
                  48 $CellContext`c$$^2 $CellContext`k + 
                  16 $CellContext`c$$^3 $CellContext`k + 26 $CellContext`k^2 - 
                  52 $CellContext`c$$ $CellContext`k^2 + 
                  26 $CellContext`c$$^2 $CellContext`k^2 - 
                  16 $CellContext`k^3 + 16 $CellContext`c$$ $CellContext`k^3 + 
                  3 $CellContext`k^4 + 
                  4 $CellContext`k $CellContext`\[Gamma]$$ - 
                  12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
                  12 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ - 
                  4 $CellContext`c$$^3 $CellContext`k $CellContext`\[Gamma]$$ - 
                  4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
                  8 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
                  4 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ - 4 $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                  4 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Gamma]$$ + 
                  4 $CellContext`k^4 $CellContext`\[Gamma]$$ - 
                  4 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
                  8 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 - 
                  4 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 + 8 $CellContext`k^3 $CellContext`\[Gamma]$$^2 - 
                  8 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 - 4 $CellContext`k^4 $CellContext`\[Gamma]$$^2 + 
                  16 $CellContext`\[Mu]$$ - 
                  64 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                  96 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                  64 $CellContext`c$$^3 $CellContext`\[Mu]$$ + 
                  16 $CellContext`c$$^4 $CellContext`\[Mu]$$ - 
                  116 $CellContext`k $CellContext`\[Mu]$$ + 
                  348 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                  348 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$ + 
                  116 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$ + 
                  224 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                  448 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Mu]$$ + 
                  224 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$ - 156 $CellContext`k^3 $CellContext`\[Mu]$$ + 
                  156 $CellContext`c$$ $CellContext`k^3 $CellContext`\[Mu]$$ + 
                  32 $CellContext`k^4 $CellContext`\[Mu]$$ + 
                  32 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                  96 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 
                  96 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  32 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  44 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                  88 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  44 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                  24 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 
                  24 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                  36 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 32 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  64 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  32 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  72 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 
                  72 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  40 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 34 $CellContext`\[Mu]$$^2 - 
                  136 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                  204 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                  136 $CellContext`c$$^3 $CellContext`\[Mu]$$^2 + 
                  34 $CellContext`c$$^4 $CellContext`\[Mu]$$^2 - 
                  336 $CellContext`k $CellContext`\[Mu]$$^2 + 
                  1008 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                  1008 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^2 + 
                  336 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^2 + 782 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                  1564 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^2 + 
                  782 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^2 - 624 $CellContext`k^3 $CellContext`\[Mu]$$^2 + 
                  624 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^2 + 140 $CellContext`k^4 $CellContext`\[Mu]$$^2 + 
                  104 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 
                  312 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 
                  312 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  104 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  196 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  392 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  196 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                  28 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                  28 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                  128 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 
                  104 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                  208 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  104 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  264 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                  264 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  164 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 36 $CellContext`\[Mu]$$^3 - 
                  144 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                  216 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                  144 $CellContext`c$$^3 $CellContext`\[Mu]$$^3 + 
                  36 $CellContext`c$$^4 $CellContext`\[Mu]$$^3 - 
                  492 $CellContext`k $CellContext`\[Mu]$$^3 + 
                  1476 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                  1476 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^3 + 
                  492 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^3 + 1404 $CellContext`k^2 $CellContext`\[Mu]$$^3 - 
                  2808 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^3 + 
                  1404 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^3 - 1304 $CellContext`k^3 $CellContext`\[Mu]$$^3 + 
                  1304 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^3 + 320 $CellContext`k^4 $CellContext`\[Mu]$$^3 + 
                  176 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                  528 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 
                  528 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  176 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  452 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                  904 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                  452 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                  104 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                  104 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                  224 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 
                  176 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                  352 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  176 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  504 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                  504 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  352 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 19 $CellContext`\[Mu]$$^4 - 
                  76 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                  114 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                  76 $CellContext`c$$^3 $CellContext`\[Mu]$$^4 + 
                  19 $CellContext`c$$^4 $CellContext`\[Mu]$$^4 - 
                  376 $CellContext`k $CellContext`\[Mu]$$^4 + 
                  1128 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                  1128 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^4 + 
                  376 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^4 + 1344 $CellContext`k^2 $CellContext`\[Mu]$$^4 - 
                  2688 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^4 + 
                  1344 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^4 - 1488 $CellContext`k^3 $CellContext`\[Mu]$$^4 + 
                  1488 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^4 + 400 $CellContext`k^4 $CellContext`\[Mu]$$^4 + 
                  164 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                  492 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 
                  492 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                  
                  164 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                  568 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 + 
                  1136 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 - 
                  568 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                  336 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                  336 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^4 + 
                  192 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^4 - 
                  164 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                  328 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  164 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  528 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                  528 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  416 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 4 $CellContext`\[Mu]$$^5 - 
                  16 $CellContext`c$$ $CellContext`\[Mu]$$^5 + 
                  24 $CellContext`c$$^2 $CellContext`\[Mu]$$^5 - 
                  16 $CellContext`c$$^3 $CellContext`\[Mu]$$^5 + 
                  4 $CellContext`c$$^4 $CellContext`\[Mu]$$^5 - 
                  136 $CellContext`k $CellContext`\[Mu]$$^5 + 
                  408 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^5 - 
                  408 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Mu]$$^5 + 
                  136 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Mu]$$^5 + 624 $CellContext`k^2 $CellContext`\[Mu]$$^5 - 
                  1248 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^5 + 
                  624 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^5 - 864 $CellContext`k^3 $CellContext`\[Mu]$$^5 + 
                  864 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^5 + 256 $CellContext`k^4 $CellContext`\[Mu]$$^5 + 
                  80 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 - 
                  240 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^5 + 
                  240 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                  80 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                  368 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 + 
                  736 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 - 
                  368 $CellContext`c$$^2 $CellContext`k^2 $CellContext`\
\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                  352 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 - 
                  352 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^5 + 
                  64 $CellContext`k^4 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^5 - 
                  80 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^5 + 
                  160 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 - 
                  80 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 + 
                  288 $CellContext`k^3 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 
                  288 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^5 - 
                  256 $CellContext`k^4 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^5 - 16 $CellContext`k $CellContext`\[Mu]$$^6 + 
                  48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^6 - 
                  48 $CellContext`c$$^2 $CellContext`k $CellContext`\[Mu]$$^6 + 
                  16 $CellContext`c$$^3 $CellContext`k $CellContext`\[Mu]$$^6 + 
                  96 $CellContext`k^2 $CellContext`\[Mu]$$^6 - 
                  192 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Mu]$$^6 + 
                  96 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Mu]$$^6 - 192 $CellContext`k^3 $CellContext`\[Mu]$$^6 + 
                  192 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Mu]$$^6 + 64 $CellContext`k^4 $CellContext`\[Mu]$$^6 + 
                  16 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 - 
                  48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^6 + 
                  48 $CellContext`c$$^2 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  16 $CellContext`c$$^3 $CellContext`k \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  96 $CellContext`k^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^6 + 
                  192 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  96 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 + 
                  128 $CellContext`k^3 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^6 - 
                  128 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^6 - 
                  16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6 + 
                  32 $CellContext`c$$ $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 - 
                  16 $CellContext`c$$^2 $CellContext`k^2 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 + 
                  64 $CellContext`k^3 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6 - 
                  64 $CellContext`c$$ $CellContext`k^3 \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^6 - 
                  64 $CellContext`k^4 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^6))^Rational[1, 2]), $CellContext`k < 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2)^(-1) (
                1 - $CellContext`c$$ + $CellContext`\[Gamma]$$ - \
$CellContext`c$$ $CellContext`\[Gamma]$$ + 4 $CellContext`\[Mu]$$ - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                3 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Mu]$$^2 - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + (-1 + $CellContext`c$$) (1 + 
                  2 $CellContext`\[Mu]$$) (1 - 
                   2 $CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2 + 
                   4 $CellContext`\[Mu]$$ - 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`\[Mu]$$^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2)^Rational[1, 2])}, {
             Rational[1, 4] (2 - 
               2 $CellContext`c$$ - ($CellContext`k $CellContext`\[Gamma]$$^2 \
(4 - 4 $CellContext`c$$ + $CellContext`k (-4 + $CellContext`\[Gamma]$$) \
$CellContext`\[Gamma]$$))^
               Rational[1, 2] - $CellContext`k (
                2 + (-2 + $CellContext`\[Gamma]$$) $CellContext`\[Gamma]$$)), \
$CellContext`k > 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2)^(-1) (
                1 - $CellContext`c$$ + $CellContext`\[Gamma]$$ - \
$CellContext`c$$ $CellContext`\[Gamma]$$ + 4 $CellContext`\[Mu]$$ - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                3 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                3 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Mu]$$^2 - 
                4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + (-1 + $CellContext`c$$) (1 + 
                  2 $CellContext`\[Mu]$$) (1 - 
                   2 $CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2 + 
                   4 $CellContext`\[Mu]$$ - 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`\[Mu]$$^2 + $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2)^Rational[1, 2])}}, 0], 
           
           Piecewise[{{
             Rational[-1, 
                4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                2 $CellContext`\[Mu]$$)^(-3) (
               4 $CellContext`k $CellContext`\[Gamma]$$ - 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
               4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
               2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
               4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
               30 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
               28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
               28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
               12 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
               7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 \
$CellContext`\[Mu]$$ - 
               30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
               84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
               84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
               9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
               72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
               12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
               30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
               21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
               84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
               104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
               104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
               14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
               7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
               80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
               24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
               38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
               31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
               104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
               48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
               48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
               32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
               16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
               20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
               18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
               48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
               8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                 Rational[
                  1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                   2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                  4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                  8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                  4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                   63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                   511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                   257 $CellContext`\[Mu]$$^6) - 
                  
                  4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                   4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                   22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                   3 $CellContext`\[Mu]$$^2 + 
                   40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                   3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                   24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                   18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                   12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                   3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                   2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                   4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                   2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                   3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                Rational[1, 2]), 
              Rational[-1, 
                 4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                 1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                 2 $CellContext`\[Mu]$$)^(-3) (
                4 $CellContext`k $CellContext`\[Gamma]$$ - 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
                2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
                4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
                2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
                4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
                30 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                28 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
                28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
                2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
                12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
                7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$ - 
                30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
                84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                72 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                30 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                80 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                38 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                32 $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                20 $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
                8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                  Rational[
                   1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                    2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                   4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 $CellContext`\
\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                   8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                   4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                    63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                    511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                    257 $CellContext`\[Mu]$$^6) - 
                   
                   4 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                    4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                    22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                    3 $CellContext`\[Mu]$$^2 + 
                    40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                    24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                    18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                    3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                    2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                    4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                    2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                    3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                 Rational[1, 2]) < -$CellContext`\[Gamma]$$^(-1) (
                1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                 3 $CellContext`\[Mu]$$ + 
                 2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                  2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                  Rational[1, 2]) (1 + 
                 2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$))}, {
             Rational[1, 2] 
              Re[(-1 - 6 $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  13 $CellContext`\[Mu]$$^2 + 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  12 $CellContext`\[Mu]$$^3 + 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Mu]$$^4 + 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4)^(-1) \
(-2 + 2 $CellContext`c$$ + 2 $CellContext`k + 2 $CellContext`\[Gamma]$$ - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$ - 
                 2 $CellContext`k $CellContext`\[Gamma]$$^2 - 
                 12 $CellContext`\[Mu]$$ + 
                 12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                 16 $CellContext`k $CellContext`\[Mu]$$ + 
                 8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                 8 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 26 $CellContext`\[Mu]$$^2 + 
                 26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                 48 $CellContext`k $CellContext`\[Mu]$$^2 + 
                 10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                 10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 24 $CellContext`\[Mu]$$^3 + 
                 24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                 64 $CellContext`k $CellContext`\[Mu]$$^3 + 
                 4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                 16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                 8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                 32 $CellContext`k $CellContext`\[Mu]$$^4 + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                 18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                 2 $CellContext`k $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 - ((2 - 2 $CellContext`c$$ - 2 $CellContext`k - 
                    2 $CellContext`\[Gamma]$$ + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                    2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                    12 $CellContext`\[Mu]$$ - 
                    12 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    16 $CellContext`k $CellContext`\[Mu]$$ - 
                    8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ - 4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ + 
                    16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 26 $CellContext`\[Mu]$$^2 - 
                    26 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                    10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 - 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                    52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 - 
                    4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 + 24 $CellContext`\[Mu]$$^3 - 
                    24 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 - 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                    80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 - 
                    16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 + 8 $CellContext`\[Mu]$$^4 - 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                    32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                    6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                    48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 - 
                    18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 + 
                    2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\
\[Mu]$$^4)^2 - 4 (-1 - 6 $CellContext`\[Mu]$$ + 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   13 $CellContext`\[Mu]$$^2 + 
                   7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                   12 $CellContext`\[Mu]$$^3 + 
                   8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Mu]$$^4 + 
                   3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4) (-2 + 
                   4 $CellContext`c$$ - 2 $CellContext`c$$^2 + 
                   2 $CellContext`k - 
                   2 $CellContext`c$$ $CellContext`k - $CellContext`k^2 + 
                   2 $CellContext`\[Gamma]$$ - 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$ + 
                   2 $CellContext`c$$^2 $CellContext`\[Gamma]$$ - 
                   2 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                   2 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 + $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
                   12 $CellContext`\[Mu]$$ + 
                   24 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   12 $CellContext`c$$^2 $CellContext`\[Mu]$$ + 
                   16 $CellContext`k $CellContext`\[Mu]$$ - 
                   16 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$ - 
                   8 $CellContext`k^2 $CellContext`\[Mu]$$ + 
                   8 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ - 
                   16 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ + 8 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$ + 
                   4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   16 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 
                   16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   8 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 26 $CellContext`\[Mu]$$^2 + 
                   52 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   26 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 + 
                   48 $CellContext`k $CellContext`\[Mu]$$^2 - 
                   48 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^2 - 
                   24 $CellContext`k^2 $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^2 - 
                   20 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^2 + 
                   10 $CellContext`c$$^2 $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 14 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                   28 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 
                   14 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                   52 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                   52 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   26 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^2 - 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 
                   2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                   4 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                   4 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 24 $CellContext`\[Mu]$$^3 + 
                   48 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   24 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 + 
                   64 $CellContext`k $CellContext`\[Mu]$$^3 - 
                   64 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^3 - 
                   32 $CellContext`k^2 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 
                   4 $CellContext`c$$^2 $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$^3 + 16 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                   32 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 
                   16 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                   80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                   80 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   40 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                   4 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                   16 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                   16 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
                   16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
                   8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
                   32 $CellContext`k $CellContext`\[Mu]$$^4 - 
                   32 $CellContext`c$$ $CellContext`k $CellContext`\[Mu]$$^4 - 
                   16 $CellContext`k^2 $CellContext`\[Mu]$$^4 + 
                   6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                   12 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 
                   6 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                   48 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                   48 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$^4 - 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                   2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                   18 $CellContext`k $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                   18 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 - 
                   9 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 2 $CellContext`k $CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`k \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4 + $CellContext`k^2 \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])], 
              And[
              Rational[-1, 
                  4] $CellContext`k^(-1) $CellContext`\[Gamma]$$^(-2) (
                  1 + $CellContext`\[Mu]$$)^(-1) (1 + 
                  2 $CellContext`\[Mu]$$)^(-3) (
                 4 $CellContext`k $CellContext`\[Gamma]$$ - 
                 4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + \
$CellContext`\[Gamma]$$^2 - 
                 2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 + \
$CellContext`c$$^2 $CellContext`\[Gamma]$$^2 - 
                 4 $CellContext`k $CellContext`\[Gamma]$$^2 + 
                 4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 - 
                 2 $CellContext`k $CellContext`\[Gamma]$$^3 + 
                 
                 2 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 + \
$CellContext`k^2 $CellContext`\[Gamma]$$^4 - 
                 4 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] + 
                 30 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ - 
                 30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$ + 5 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 10 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 5 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 28 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ + 
                 28 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$ - 
                 2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 12 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\[Mu]$$ + 
                 12 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$ + 
                 7 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$ - 
                 30 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$ + 
                 84 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 - 
                 84 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^2 + 9 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 18 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                 9 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 72 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 + 
                 72 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                 12 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                 30 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^2 + 
                 30 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^2 + 
                 21 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^2 - 
                 84 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                 2 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^2 + 
                 104 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 - 
                 104 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^3 + 7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                 7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 80 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 + 
                 80 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                 24 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                 38 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^3 + 
                 38 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^3 + 
                 31 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^3 - 
                 104 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                 8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^3 + 
                 48 $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 - 
                 48 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 
                 4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 32 $CellContext`k $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 + 
                 32 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4 - 
                 16 $CellContext`k^2 $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                 20 $CellContext`k $CellContext`\[Gamma]$$^3 $CellContext`\
\[Mu]$$^4 + 
                 20 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$^3 \
$CellContext`\[Mu]$$^4 + 
                 18 $CellContext`k^2 $CellContext`\[Gamma]$$^4 $CellContext`\
\[Mu]$$^4 - 
                 48 $CellContext`k $CellContext`\[Gamma]$$ (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2] $CellContext`\[Mu]$$^4 + 
                 8 $CellContext`k $CellContext`\[Gamma]$$^3 (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                   Rational[
                    1, 2] $CellContext`\[Mu]$$^4 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$) ($CellContext`\[Gamma]$$ + 
                    2 $CellContext`\[Gamma]$$ $CellContext`\[Mu]$$)^2 (
                    4 $CellContext`k^3 $CellContext`\[Gamma]$$^7 \
$CellContext`\[Mu]$$^4 (1 + 2 $CellContext`\[Mu]$$)^2 - 
                    8 $CellContext`k^2 (-1 + $CellContext`c$$ + (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) $CellContext`\[Mu]$$ (1 + 
                    2 $CellContext`\[Mu]$$)^4 (2 + 3 $CellContext`\[Mu]$$) + 
                    4 (-1 + $CellContext`c$$) $CellContext`\[Gamma]$$^6 \
$CellContext`\[Mu]$$^4 ($CellContext`k + 
                    2 $CellContext`k $CellContext`\[Mu]$$)^2 - \
$CellContext`k^3 $CellContext`\[Gamma]$$^5 (1 + 10 $CellContext`\[Mu]$$ + 
                    63 $CellContext`\[Mu]$$^2 + 240 $CellContext`\[Mu]$$^3 + 
                    511 $CellContext`\[Mu]$$^4 + 566 $CellContext`\[Mu]$$^5 + 
                    257 $CellContext`\[Mu]$$^6) - 
                    4 $CellContext`k $CellContext`\[Gamma]$$ $CellContext`\
\[Mu]$$ (1 + 2 $CellContext`\[Mu]$$)^2 (1 + 
                    4 $CellContext`k^2 - (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] + 3 $CellContext`\[Mu]$$ + 
                    22 $CellContext`k^2 $CellContext`\[Mu]$$ - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2] $CellContext`\[Mu]$$ + 
                    3 $CellContext`\[Mu]$$^2 + 
                    40 $CellContext`k^2 $CellContext`\[Mu]$$^2 - 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^2 + $CellContext`\[Mu]$$^3 + 
                    24 $CellContext`k^2 $CellContext`\[Mu]$$^3 - (-(-1 + \
$CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2] $CellContext`\[Mu]$$^3 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 + $CellContext`c$$ (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^Rational[1, 2]) (
                    1 + $CellContext`\[Mu]$$)^3) + $CellContext`k \
$CellContext`\[Gamma]$$^3 (-3 + 
                    2 (-7 + 10 $CellContext`k^2) $CellContext`\[Mu]$$ - (17 - 
                    200 $CellContext`k^2 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    4 (-4 - 199 $CellContext`k^2 + 
                    5 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 - (-55 - 
                    1580 $CellContext`k^2 + 
                    36 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 - 
                    2 (-23 - 784 $CellContext`k^2 + 
                    14 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 - (-13 - 
                    624 $CellContext`k^2 + 
                    
                    8 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^3 (-3 - 5 $CellContext`\[Mu]$$ + 
                    7 $CellContext`\[Mu]$$^2 + 13 $CellContext`\[Mu]$$^3) + 
                    2 $CellContext`c$$ (1 + $CellContext`\[Mu]$$)^3 (3 + 
                    5 $CellContext`\[Mu]$$ + (-7 + 
                    2 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 + (-13 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^3)) - $CellContext`k^2 \
$CellContext`\[Gamma]$$^4 (-3 - 
                    18 $CellContext`\[Mu]$$ - (65 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^2 - 
                    12 (17 + (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^3 + 
                    3 (-147 + 
                    4 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^4 + 
                    2 (-257 + 
                    34 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$^5 + (-243 + 
                    56 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[
                    1, 2]) $CellContext`\[Mu]$$^6 + $CellContext`c$$ (3 + 
                    18 $CellContext`\[Mu]$$ + 65 $CellContext`\[Mu]$$^2 + 
                    204 $CellContext`\[Mu]$$^3 + 441 $CellContext`\[Mu]$$^4 + 
                    514 $CellContext`\[Mu]$$^5 + 
                    243 $CellContext`\[Mu]$$^6)) - $CellContext`\[Gamma]$$^2 \
(-1 - 2 (3 + 2 $CellContext`k^2 (-4 + 
                    3 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$ - (15 + 
                    4 $CellContext`k^2 (-43 + 
                    31 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^2 - 
                    4 (5 + $CellContext`k^2 (-180 + 
                    127 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^3 - (15 + 
                    148 $CellContext`k^2 (-10 + 
                    7 (-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\
\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^4 - 
                    2 (3 + 16 $CellContext`k^2 (-47 + 
                    33 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^5 - (1 + 
                    16 $CellContext`k^2 (-38 + 
                    27 (-(-1 + $CellContext`c$$ + $CellContext`k \
$CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                    Rational[1, 2])) $CellContext`\[Mu]$$^6 - 
                    3 $CellContext`c$$^2 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$^3 (
                    1 + $CellContext`\[Mu]$$)^6 + $CellContext`c$$ (3 - 
                    2 (-9 + 8 $CellContext`k^2) $CellContext`\[Mu]$$ + (45 - 
                    172 $CellContext`k^2) $CellContext`\[Mu]$$^2 + (60 - 
                    720 $CellContext`k^2) $CellContext`\[Mu]$$^3 - 
                    5 (-9 + 296 $CellContext`k^2) $CellContext`\[Mu]$$^4 - 
                    2 (-9 + 752 $CellContext`k^2) $CellContext`\[Mu]$$^5 + (3 - 
                    608 $CellContext`k^2) $CellContext`\[Mu]$$^6))))^
                  Rational[1, 2]) > -$CellContext`\[Gamma]$$^(-1) (
                 1 + (2 + $CellContext`\[Gamma]$$) $CellContext`\[Mu]$$) (1 + 
                  3 $CellContext`\[Mu]$$ + 
                  2 $CellContext`\[Mu]$$^2)^(-1) ($CellContext`c$$ (-1 + \
$CellContext`\[Gamma]$$) (1 + 
                   2 $CellContext`\[Mu]$$) - (-1 + (-(-1 + $CellContext`c$$ + \
$CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + $CellContext`\[Gamma]$$^2))^
                   Rational[1, 2]) (1 + 
                  2 $CellContext`\[Mu]$$) + $CellContext`\[Gamma]$$ (-1 + (-2 + \
(-(-1 + $CellContext`c$$ + $CellContext`k $CellContext`\[Gamma]$$)^2 (-1 + \
$CellContext`\[Gamma]$$^2))^
                    Rational[1, 2]) $CellContext`\[Mu]$$)), $CellContext`k <= 
               Rational[
                 1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  11 $CellContext`\[Mu]$$^2 + 
                  19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`\[Mu]$$^3 + 
                  32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  12 $CellContext`\[Mu]$$^4 + 
                  21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                   10 $CellContext`\[Mu]$$^2 + 
                   10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                   4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                    8 $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    10 $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4)^2 - 
                  4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                   6 $CellContext`\[Mu]$$ - 
                   12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                   6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                   2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                   13 $CellContext`\[Mu]$$^2 - 
                   26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                   13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                   7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                   14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 
                   7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                   24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                   12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                   16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 
                   8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                   8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                   4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                   3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                   6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                   3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                   6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                   11 $CellContext`\[Mu]$$^2 + 
                   19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                   2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                   20 $CellContext`\[Mu]$$^3 + 
                   32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                   8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                   12 $CellContext`\[Mu]$$^4 + 
                   21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                   
                   9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])]}, {
             1 - $CellContext`c$$ - $CellContext`k, $CellContext`k > 
              Rational[
                1, 2] ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                 6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                 11 $CellContext`\[Mu]$$^2 + 
                 19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                 2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                 20 $CellContext`\[Mu]$$^3 + 
                 32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                 8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                 12 $CellContext`\[Mu]$$^4 + 
                 21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                 9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4)^(-1) \
(-$CellContext`\[Gamma]$$ (-2 + 2 $CellContext`c$$ - 8 $CellContext`\[Mu]$$ + 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                  10 $CellContext`\[Mu]$$^2 + 
                  10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                  4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4) - ($CellContext`\[Gamma]$$^2 (-2 + 2 $CellContext`c$$ - 
                    8 $CellContext`\[Mu]$$ + 
                    8 $CellContext`c$$ $CellContext`\[Mu]$$ - 
                    10 $CellContext`\[Mu]$$^2 + 
                    10 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
                    2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 - 4 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
                    4 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                    4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 - 2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                    2 $CellContext`c$$ $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4)^2 - 
                 4 (1 - 2 $CellContext`c$$ + $CellContext`c$$^2 + 
                  6 $CellContext`\[Mu]$$ - 
                  12 $CellContext`c$$ $CellContext`\[Mu]$$ + 
                  6 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
                  2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  4 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$ - 2 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ + 
                  13 $CellContext`\[Mu]$$^2 - 
                  26 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
                  13 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
                  7 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 + 
                  14 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^2 - 
                  7 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Mu]$$^3 - 
                  24 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
                  12 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 + 
                  16 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^3 - 
                  8 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Mu]$$^4 - 
                  8 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
                  4 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 - 
                  3 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 + 
                  6 $CellContext`c$$ $CellContext`\[Gamma]$$^2 $CellContext`\
\[Mu]$$^4 - 
                  3 $CellContext`c$$^2 $CellContext`\[Gamma]$$^2 \
$CellContext`\[Mu]$$^4) ($CellContext`\[Gamma]$$^2 - 2 $CellContext`\[Mu]$$ + 
                  6 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$ - 
                  11 $CellContext`\[Mu]$$^2 + 
                  19 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^2 - 
                  2 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^2 - 
                  20 $CellContext`\[Mu]$$^3 + 
                  32 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^3 - 
                  8 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^3 - 
                  12 $CellContext`\[Mu]$$^4 + 
                  21 $CellContext`\[Gamma]$$^2 $CellContext`\[Mu]$$^4 - 
                  
                  9 $CellContext`\[Gamma]$$^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]$$^6 $CellContext`\[Mu]$$^4))^Rational[1, 2])}}, 
            0]]}, {$CellContext`k, 0.001, 1}, PlotRange -> {0, 1}, 
         AxesLabel -> {K, $CellContext`\[CapitalDelta]}, 
         PlotStyle -> {{Black, Thick}, {Black}, Black, Black, Black}, 
         Filling -> {4 -> Axis, 5 -> {3}}, FillingStyle -> {Gray}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.2}, 0, 
         1}, {{$CellContext`c$$, 0.0001}, 0, 1}, {{$CellContext`\[Mu]$$, 10}, 
         0, 150}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {402., 413.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.740573835837878*^9, 3.740574020204481*^9}, 
   3.7405744421732454`*^9, 3.740574498596377*^9, {3.7405746717250824`*^9, 
   3.740574689067192*^9}, {3.7405747784319763`*^9, 3.740574792761104*^9}, {
   3.7405748908882055`*^9, 3.7405749131825275`*^9}, {3.7405749483029785`*^9, 
   3.7405749721504326`*^9}, {3.740575003485812*^9, 3.740575090445196*^9}, {
   3.740575164670701*^9, 3.7405751825432568`*^9}, 3.740575384571823*^9, 
   3.7406768241670904`*^9, 3.7407227890759993`*^9, 3.7407411107278557`*^9, 
   3.7408013344878426`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Figure", " ", "2", " ", "in", " ", "the", " ", "paper"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"parameters", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.4"}], ",", 
       RowBox[{"\[Mu]", "\[Rule]", "2"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "Next", " ", "two", " ", "are", " ", "used", " ", "to", " ", "fill", " ", 
     "the", " ", "gray", " ", "areas"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Max", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Piecewise", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"dTestTwoPart2", " ", ",", 
            RowBox[{"k", "<", "kswitchTest"}]}], "}"}], ",", 
          RowBox[{"{", " ", 
           RowBox[{"dTESTconstr", ",", 
            RowBox[{"k", ">", "kswitchTest"}]}], "}"}]}], "}"}], "]"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Piecewise", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"dWelfaremix", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
            RowBox[{
             RowBox[{"dWelfaremix", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
             "dkswitchmix"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Re", "[", " ", 
             RowBox[{"dWelfPure", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
            RowBox[{
             RowBox[{
              RowBox[{"dWelfaremix", "[", 
               RowBox[{"[", 
                RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
              "dkswitchmix"}], "&&", 
             RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"1", "-", "c", "-", "k"}], ",", 
            RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}]}], "]"}], "/.",
      "parameters"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Min", "[", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"Piecewise", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"dTestTwoPart2", " ", ",", 
            RowBox[{"k", "<", "kswitchTest"}]}], "}"}], ",", 
          RowBox[{"{", " ", 
           RowBox[{"dTESTconstr", ",", 
            RowBox[{"k", ">", "kswitchTest"}]}], "}"}]}], "}"}], "]"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Piecewise", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"dWelfaremix", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
            RowBox[{
             RowBox[{"dWelfaremix", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
             "dkswitchmix"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Re", "[", " ", 
             RowBox[{"dWelfPure", "[", 
              RowBox[{"[", 
               RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
            RowBox[{
             RowBox[{
              RowBox[{"dWelfaremix", "[", 
               RowBox[{"[", 
                RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
              "dkswitchmix"}], "&&", 
             RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"1", "-", "c", "-", "k"}], ",", 
            RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}]}], "]"}], "/.",
      "parameters"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"These", " ", "are", " ", "the", " ", "boundaries"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Min", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"1", "-", "c"}], ")"}], 
        RowBox[{"(", 
         RowBox[{"1", "-", "\[Gamma]"}], ")"}]}], ",", 
       RowBox[{"1", "-", "c", "-", "k"}]}], "]"}], "/.", "parameters"}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Piecewise", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"dTestTwoPart2", " ", ",", 
          RowBox[{"k", "<", "kswitchTest"}]}], "}"}], ",", 
        RowBox[{"{", " ", 
         RowBox[{"dTESTconstr", ",", 
          RowBox[{"k", ">", "kswitchTest"}]}], "}"}]}], "}"}], "]"}], "/.", 
     "parameters"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"Piecewise", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"dWelfaremix", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
          RowBox[{
           RowBox[{"dWelfaremix", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "<", 
           "dkswitchmix"}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"Re", "[", " ", 
           RowBox[{"dWelfPure", "[", 
            RowBox[{"[", 
             RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], "]"}], ",", 
          RowBox[{
           RowBox[{
            RowBox[{"dWelfaremix", "[", 
             RowBox[{"[", 
              RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", 
            "dkswitchmix"}], "&&", 
           RowBox[{"k", "<=", "kWelMax"}]}]}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"Null", ",", 
          RowBox[{"k", ">", "kWelMax"}]}], "}"}]}], "}"}], "]"}], "/.", 
     "parameters"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", "Plotting", "*)"}], "\[IndentingNewLine]", 
   RowBox[{"Figure2", "=", 
    RowBox[{"Quiet", "[", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"%", ",", "%%", ",", "%%%", ",", "%%%%", ",", "%%%%%"}], 
        "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0.001", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0.7"}], "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"K", ",", "\[CapitalDelta]"}], "}"}]}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", " ", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Black", ",", "Thick"}], "}"}], ",", 
          RowBox[{"{", "Black", "}"}], ",", "Black", ",", "Black", ",", 
          "Black"}], "}"}]}], ",", "\[IndentingNewLine]", 
       RowBox[{"Filling", "->", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"4", "\[Rule]", "Axis"}], ",", 
          RowBox[{"5", "\[Rule]", 
           RowBox[{"{", "3", "}"}]}]}], "}"}]}], ",", "\[IndentingNewLine]", 
       RowBox[{"FillingStyle", "\[Rule]", 
        RowBox[{"{", "Gray", "}"}]}], ",", 
       RowBox[{"PlotPoints", "\[Rule]", "1000"}]}], "\[IndentingNewLine]", 
      "]"}], "]"}]}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"ParentDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", "\"\<Figures\>\"", "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Export", "[", 
     RowBox[{"\"\<AECTestCeKFigure2.pdf\>\"", ",", "Figure2"}], "]"}], 
    ";"}]}]}]], "Input",
 CellChangeTimes->{{3.732888682938962*^9, 3.732888720653963*^9}, {
   3.7328887590234823`*^9, 3.732888773057062*^9}, {3.7328888126273403`*^9, 
   3.732888923212778*^9}, {3.7328889555213985`*^9, 3.7328889710503516`*^9}, {
   3.732889061387287*^9, 3.732889062929139*^9}, {3.732889203911458*^9, 
   3.732889301663131*^9}, {3.732889339405588*^9, 3.732889347786707*^9}, 
   3.732889379929554*^9, {3.7328894822538395`*^9, 3.732889534628327*^9}, {
   3.732889565388169*^9, 3.732889591336404*^9}, {3.732889701965727*^9, 
   3.7328897500449095`*^9}, {3.7405745786493883`*^9, 3.740574607372815*^9}, {
   3.7405752170671177`*^9, 3.740575315736664*^9}, {3.740575348916952*^9, 
   3.740575356352786*^9}, {3.7406768351805553`*^9, 3.7406768353486795`*^9}, {
   3.740722671596496*^9, 3.740722676226858*^9}, {3.740722724466091*^9, 
   3.7407227253093724`*^9}, 3.7407227955111732`*^9, 3.740810991170085*^9, 
   3.740811039851472*^9}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxsu3k41U/8/y2kZMkuki1RhIRs1UsipKQk0kK2JG3Kmi1rEckekhb77jiR
fV/PaufY96VsLQrlnvO9v5/zu67ffffP53penTPvmXm/5jEz59NDzOrBJVt6
Ojq6cG46Oup/ve07pgytjIDuf/9EyqjJPnrTD+9mUj4MJhFh8Y3+niWUlRm3
mdqj3NrPJyt/YRbueqiuHKwn/H/y+1cuW1tbS7T2CiX4bkW7kmH56Oskn+wz
IFs3H+oYTIYrcyPbDciWMC+nvys+ngz5/PyNQ9WOIPGF/v7jTDK4dg3Rsx98
Aus76Ohkv5Bhpxd5qvCpO3BKBk+ptZGhqE7BiyLvA/U7L/2RGCCDxNKnpT+q
frC60221eo4Mi03WTygNAWDVJwV566h9JvkQI59guO+4t8xjVwdg5BhqpulD
oJwY/zxhbwdcVwpYy8G8hECjR8cdDnfAjy39UZYLr2A+Jkx4z/EOwJK5qnoH
IuB1luJlgfMdkHXLX2N5fyR0+u8r/X29A04ksVapGEfBlcOvH8jc74BM+zn3
pLhouLJqwcru0wF5e5wrx8kxsOLp1EsI7wCKztTT699jgdDD/mv8XQfQ8cWT
ZQ7Fw5mfi1rd+R2wJJ3oUXzmDWgoSDu7VnfAjovCz6WvJcCj40vrjqQOKLy4
Wa3qnwharL/zNEc74IjPWMVyVBKYZId8vr3SARZKfk2fSt7C1G23jyfpO2FX
3Hs+6Y5k4JjLrPrO2Qk/RqfO6va8A081W9lN8U4IUFSWuuySAv6GNm3jRzvh
bemO5rBfKbDjWdU5d61OqKr2c85yeg94vw/i1sad4HpsI+r12nuQ02+TlLHu
BCsz2amlRx+ANPzU+8yTTijgsYoh/fgAS6+fl3MGdkKoC74n6PFHyGTulyyP
7oT65TlHsdmPkGqEmSpJ7QQx9bojczaf4Ph1ckckthNWlAlm+N5PwKPizl3b
1AlPzGRq3lxKhTvynmrvejth0cTtiEtrKlz9Whd2baYTvtttO9l7LA1C3aKU
7/7uhPWxk9uJ2Wlg1prOcnVnFwRQKn768qfDBxX+5l/8XQBuFvx5Pukg68zR
M3OwC2qPMbhKLKWDset57hLVLthxq+011iQDyvV4PvXrd8F3kgu/UX0GpKgc
E8wx74JdYVxmV2UzQXQhseq6Qxc4hbyRHwrPhLF7oZ8tn3aBt9n9PuG1TDiJ
rRrUCu2Cz/1YE1bTLNgjeH62K6EL3Fxs+dsxWaBoaKtblt0Fqyq7Grf4smHu
TG2XV3kXVOprqqg5ZcMoezo2GtcFD8cWLXI7s+FxIqnhxWAXTNfruJvI5oC/
jskXua9dEBch/XrTPwe6qqy3Sf3tAsmH6jffjOZAzSbW9S9rNzQ7GJhXK+fC
InPkKSnhbhiJ0FX5EJELb5Ral+nku+FZxZEIt9lcGNmvTSg92Q1nax4SDqvl
gd243lb9hW7ABfN6m7/Kg+e2r2/mWnTDk4Ensa+H80CKSfnjmQfdUCpQdIJb
Jh92ulhpKPp2wyPs9wMEz3wIyOrc9u9VN9Qp71Mea86HU3mEvULvu0HlUqTJ
JksBPCVK7J0v7AbrKqfe9KMFYISt0out7Qa+8fIYySsFcNthvDWmoxscjRpF
d3oWgMCkvvvj8W640ZTOSE4uAFZZDc9P37uBfaPPaKK+ADyjgm0CGXvg9sFt
U5kzBRBcxf9Um6cHbu0Os/faWQhdpQpTVw70wLdDXQc8ZQqhwvWVl65yD3wW
3SaWaFAIYpf1Nma0e+Ad5RJTjEMhNG+F4CgmPXCn9L3N29BC2PmQE5dr2wO8
wU10c5mFEJovJtLp0gMX0444yLShzBpmmhHcA95eA5mn5wpBUu541bW4Hij+
zUZXt70I6EWc3awyekCVM2VNUKII3LtWLHVLe6AwfWx+AYrgfnqr3GBzD/zd
d8X/s3kRfNKXMWro64FUW/8JTdcicC4gvQuZ7QGicnGZ9esiCJ7e0vr0pweG
UE0dyS0CpTEnniTmXoD3zU/SmorA4o9m+2mBXvi3lwUjOVIE7aPx3Sele6E6
+l31sT9F0PFSiX2Pei/Idj+r3c2JAcGd5gnaBr3gv5qoYy2NgdGUARax673A
2C0oXqGFgVP/krMpd3vhwOuEfX/NMDAh/S15zrMXJF3k1d49xICokE9N98te
EC52e6IWhIEBacfmR0m9MHz9JdufBAz07JwQu5XbC+cmKiK2FWLgXvbbLLnK
XlBiUTQQacSAzr7xoAsE1N51PL3TAAYScp7piY70grr4aNLUIgZC6GxViYu9
sEq58ih0WzFU7O94St7qhTwZO09D3mJ4weL/rXB3H/BrCqZfkiqGuLrKoinR
PriMeUWyVC8G8TjjG60KfVCwUl6bfK4Y9I7IHgs9hfIHfIvajWIoiI+wSrnU
B7K//gw33y8GTKNKZZRVH/Dearar9S4GRQ71v8ec+uDZnNKjHeHF8ONQU4Ss
fx/sumGdJp1cDEY7Yy/RR/XBPgHVR505xbCIXbot/akP+nXmrXQrioH52Scr
emwf4Jpyihjai6Ga421oaQP6e5u9+RZ9xfD5gcjOuu4+2FN959yjadS/qKmi
zKk+eHXz9ob892Iw62I6fepnH7CZJndf3CqGzMlCycNM/VBBCqrnYcVCzJcU
1Z+8/fCZM+nwW34s1N0QSOaU6ocOhgc12P1YuCfybXZIpR8O67KEyMpjAZPK
aPVctx+ypXWP+KthQX0jVS7IrB/undvRclkbC9d5Qw9Z2ffDjYXDNRyGWKj+
98f1tXs//OhkvKRqhoWU7Q3ZD0P6oWiq3739FhaEyGQ2uYR+OGm9FW7pgIX+
u3fqT2b3Q638zcLzj7Gg0K6dLlveD3saDvXpPcUCk97Th7i2frj5fKqx2Q8L
+6I1wqoo/XD62lXulyFYIH6CvvCFfgiJ9nV+8hqNJwDvUrTZDyQG1/7IeCwc
9fu8Hsg2AIRgDnOFd1g4oT2Ro7JvAKr8LTaZU7EQ0v2m6LjcALRP31NnysaC
k0z0tMjJATgxmL+gW4CF3uS5raLzA8AwsNtCFIsFr7EWxzc3B0Ap+n7frjIs
VM0u7Lh5fwC6vCoeXajCwqnq+F/OPgPAdiXnTVwdFizMX3A7vhoAIXHxHu0m
LKxzdfNyvRuAPO4SuqhWLPQkZN1lKRiA0Zm3hZ04LJyfqV8arx4Anj9XnoYR
0fgZbjezkQegotCgRaYDC8eP2wbMjg1AIN+Rt7e7sMCmnv7g/coAODDEvTrS
gwWRHY/zcukpEOa8oobvxQIu3m9vPBcFWpmF9bb1Y2FN99u9o+IU2F/OfG8G
ZeumMW5RRQqciLyv/noACw7MgrMLWhSYfz2tPIVy0d7B3SyXKXAwufXjEsqu
Bn+EBmxQe/kCsxko94G5WfATCpi2dkuJoOzBoDMTHEiB15HzdMdR+yWhjz/Z
xVDAZcjrqUgfFpQnZLDxaRTY4RNdm4T6q2AG2R4lFODWqDjdgcbT8jqWqN5M
ASJ/X/IoGm9KgquuYR8FuNb+2buTsMBtn/QNZilQmxBt+wOPBQZjIfexNQrU
VO8zVm9H7bNJmvXsHIT4k382N5qxQP/ysW3mnkFQfKq0VtCABY6Bs03EQ4PQ
y9se212DhUQdL9Y09UGIZrgvXleBhVrn777mZwfhvFajGKYUC4ecv+tZXRsE
qeBLWtuLsXBYTQX07g5Cyc6V9zb5WMgR7BEc9hgE84W9QW+z0Ppp/6ffHDoI
IlnlaYdQfbVq3k0PTxyEX8MJ+ztR/d0OvGWWmTMI8CX5QcMbNL7wRJUPFYPg
qcL7nhKFhSvYI5tncYPg1Cgu0xWG6iH7Ao/u0CBMiBQw7QjGwohtkbnYt0EI
fHPX8YEvWp9LyT8M/w3ChVxelh3uWGCMm358ePcQaPyzVvR6hIVleiexWeEh
UL5V8loVrbd9J4PF1+SH4AW/cSevFRamToxenIQh6MWEmWiaY0H6WrTdswtD
sK/9qNvVS1go1O0gPLIcAl7us1+C9bHQ+dvYVvPhEGw/iFnnPIWFY+4WF6ye
DcHJgwoDaSpY4ONvElaKHAIPhfBMKTksRLo/FJp8PwRcRP9T3AewcCH7072Z
oiEwPG/ZsymIhfT3Qt9a6oYgXNWk1YwTC57YpYvmHUNgI/S2L38H+n78uV0w
MQQ/r6y3/94sBm3Nb8vbvg/BQAkHc91qMaiU8MvsYRyGIWyAyuOZYmhcDYxi
5RkGRSLr7pzBYiAZXBgr2D8M3nEyX6bJxSD05INfhtIwKPHceP23sRgYb6ld
8tYeBi8W18TMsmKQ3WfunG4yDBY8ylIH84qh81e3l6/dMPR+7WJIe18MPDEx
xSouw5D4s+ZTUwzaP+hHTmoFD8O+KYx43vNiwCo5rknHDYNdqd018ES8D7gc
U582DG+T5DqHHhTD4Y9NQfklw/BUFL+lYlUMH4M809yb0fPethbqmRTDdbUK
gbi+YTgTMb7AolsMkcymTjZzwzBev/a3X7UYrJOV/+z+MwxaAtEOd2WKwZk+
uZN91wjI1d679EkI7V8yZwcXBEZgw2D6UDp7MXDu91UVkhmBw2dqXultYcBL
ldNjU2MEhkSUeDaWMBDANT1XZjACYq9xDAFjGMCVa+firo+gOvtcm0LGQP6h
meQKxxEwMBK4lFCHgd3YSefrniPwBTtDKsRgoHC3Y8qFsBEIiSkhXvqIgUU5
lT+ib0egf/Dk7cEoDDjue5mqkzcCfUOG22f8MHD70HEVweoReKBdbczmhIG/
f+TXcIQRSLWTYz1ohYHuN7m7OkdGYOKdSfQXIwzo/bt/rmRpBHSIqrE6mhhQ
9Q19bLA1Ao+id935I48B7OweV4Gdo/Bv2UBTUBgDid/DDDZ3jwKdg1NWpwkG
xKebW5/vGYXjOwfTZ9D4f5XttwgQHYXGlUill4noPCAsO2N6cBQMivEbpxWw
UHlnY0/3kVGI1R9nDEO8ORm3cKtWdRRajdbCrK0+g2VOymXTU6OA0Z83dPr7
GU4ZMag36o+iejRLqYssgQc9wcc+XByFK6MRGYF7S+GkNnnwoPkoVPKsyUjk
loJ59PEEYatR2EonT2Yc/QLKj03Ofr0zCnenFmeuYL5AoZriJ2unUbDaU/f1
xfEy8Bg/ynvWYxTynGUIN8rKYNJpTX7AbxS6Tm3PuKtZDqyRd05ohY6ifTK8
vby2HPyi/t4SiBqFpdg5pauqFfDG88qRhMRRCO6TVx39XAF/dcm8IR9HIf3a
3wUWmUqg3+BI3Z8zCiJRbc5DaZXQePyfZEzxKJDP7TSxF66CHku2GueKUbAz
Fn18+GUVPHcco6drHAWvBcXf57ZVQ7B57/U/uFGYME7VWXWsBp1ej8y2rlGY
Ltt+ebarGj5qTLzTGRoFmQhuxQ2xGrjgdy9XfmoUcmRm3BhMaiCpoMKm/tso
0B+UqfYIrYH0e1/Y5X+h9m+M8YrU1AAdWx+R+d8o+Mm9m/FZroE/UeXq4Uxj
gJmcrJGXqAXNvzUVz9jHQEXg0bky41rQ+flY4TzfGNQ9Iz7Je1YLC10LF+qE
x8Ct82BnZ1EtjMQGBqZJjsHp9m8UptFaeKw5aaMkPwYsg18YLnHUQZPb8rEE
lTG49UV3GzPUwe0oYdEHMAarZiVS/+7UQUYMJ+ab7hgsq9+8vRRXByoekjco
F8bAtv5qvEpdHdidoSt0MhuD7k/MBJulOrj8PnhtzHIM7gSemhLaWw8Rw0dM
auzHwMYC/E1P14Mjw7vreo/GIPf+kOqN+/UQu0v+KbiPwXRqX+1GTD14pzi+
ZH82Bi6XRXsvVtTDDuEHusEvxqD0O0et+VQ9DHtFCTx4PQbbrwx8EWdpAJNG
zxi6BPT3USunXyg2QGgiN6PDhzEQ0CoKTzdvAPbLuBdaWWPg+Nc0N9O7AY7+
0P/SUDQGcerHrRVTG+CTy9wWtmwMKKuH6jAtDdAVfEzNp24MXF/Kv+FcaIBU
Xz2h1bYxuHeQ8HRsdyPUX/Pk6+oYA/c6fGyLQiP4CTuXWVDG4JzcD/zuK43w
qv6Vs/nEGLyy7vTwcW0E8zXT/bILY/Dg/L68kbhGaOKa8sj8PgY/Nt4MhJY1
gg9H9Fz0xhhk4oXtvQcaof/nDnppxnEYCTc9krPZCKt3DrHFsY7DNb1HNa37
msCsxlH+Mc84vLL9Vnj2eBNY/Huy8VtoHFwe3Mv+fr0JMMLvhr9JjEPbmbwp
9qdN0IR3KS47PA7x+4zzVeKbwMOGW0lBeRx+Gf195FLSBE+HyG18J8ahtCHk
4amuJrRfmrCk6YyDYgY4cn9vAi/ZoJNshuPwfO320ApHM8hs9T2fMBmH5Dsf
upwPN4NH6bKn9c1xKJu667uk3wx8l6WfX7IbB+FtXtl7bZvBuPfgiYX746Aj
Mu4m79cMhnNdk9dcx2FWNTT2ZnIzxA19+KjhMw4x7FnFpqXN8OyLMmtj8Di8
veAif7CrGUpd50MrX41D97+qMsK3ZshrOPcvLG4ccAK+FRlMLaD957HgzpRx
6CjJrj0r1gIHOSrPr6SPg+mJdL4+tRbIZW+XDigYh5f1M19EL7fAcmLQ+mLp
OJiPEZ0T77XAMxabsZaacWDfHWPAF9gCRVZMTudax6E2xSv7RHILKCS1CQB5
HDTOj5MeYFvggc3xYuZ+NP4M+btz7S1wnufxb6+xcbi4mZ20bbIF3NPajW/N
jcPwjTRnlfUWOCM6Z7a4Mg4rY53X6bhawdLzoPP8n3HguHhvcVmqFdRu8wZU
bZuAmL2iRoonWqFIrfn48V0TUKUbFrRh3Aruiwmsh7gmgAUkDv61b4WxEMWg
asEJ+N3alO/u0wo7Pruvyu6fgKLJ0xFnYlrhaf2YM4vMBCg++HvuZmYrvCpl
/xipOAEWbc8OTla1wsqrGzPPNSYg1vNzV2VHK3D+uipsehrlY3eb/ky1Qsfp
vVsEgwkQKJ+ojFtHz3v87xfWeAKITSyub9jaICI0Lf7M9QlgSPmr8l2sDf4p
bB7Ot5mAMzjB6lzlNvhS9rgvyHECNg4xl1N024BXpkB2p/MEzC1dZbpyrQ2q
vdgTfntOgFrmULfBvTaQshD8UxMwASdCnMOKvNvgyMGFbYphE9Dv4uRm/roN
gjqHxHhiJsCRVHT+5Yc28LKLWUh+OwEUdk6ZX8VtUEe5j4tPnYCsVqGYlcY2
aBz5+c4hdwJCyXkRtj1tcKf91L5p7AToX5leZ5ptA/M3+YWkygnYxnorQfd3
G3w1HF+yaZqAtz7GcznM7XAiqk6UTJiAK/6aRi8E24HypcE+p2cCwnkMHbik
20GwJdRcYWQCCpsZp7Hq7ZBe+sT6wMwErOSr0LOdbYdVFRaLlcUJMNkfwT1n
1g7DyXaMt9cmgC1rsLLbvh34ZydqDLYm4IF7n4ufazus7JGUGtgxCV6HWUpU
gtshpI/XV5NjEjgjRl0fxrbDQw+pZd49kxDyyDPa+VM7rDH8Y44RnYTUIP0C
d0w7tD/4pe5/cBLU+/zdjGrbQbMew7tXYRICBb4FC5Pa4Umq8ESI2iQ05e//
7DLcDj/vZDffOTUJ+JLt+rkLqD98f01W9SfB3a2GvuNPOwR9ergxh07IGPe0
AxQmHBTXvo76cnUSeDTOOXlw48C/ybX7qNUklN8eVdkSxcG7XB+5vQ6TkCyD
OfFYFgfXPc8p5DpNgrfeZnSjOg56+5sk+Z9OwqlxtqIcXRykCFgrLvtNgtTZ
DmKYMQ52nWqYcwqdhCrOyAZtSxzUntUtsYmaBM+/bLBxFwcqE66ucomT8EyK
P/SiKw7OW98be/9xEu6yyyU5++OgsDHAKiB7EiLiXkp/DMfB5923wjiKJ+HO
zvLeuAQc7DxuQWSpmISfw8VnE1NxILC2i3GkfhL0nmdkny7AQdubp+PXcJMA
n9XvZJfjoFWYvU+3axIUchXcZZpwcCfU1nVocBJevzR5ZkPGQXOQA7PB1CQU
DM8fODWIg8c2r4ukvk3CtiGdBJjGQfUhr+15PyfBI2Dx3tIyDq6SQx58/DsJ
8VefLTeu46Boxxncw+1T8DBAgajPiIfsA00dM2xTsG7/jujKjofVA/bLeN4p
yBEbvdjNj4d+NmLJDeEpkDgst9UjhgefgIlHjZIos0TVBsjg4fGQwOkkuSnQ
eP4M76CER/slb5WQyhTwWKbNfzuBhznNo0asMAVSg1sduWfwcNeA52Wq7hSc
6jvAvt0IDzmTH8v4jKaAm6/0K+tVPGhYmtCtmU6Bx/TP7ea38OBQ377kazkF
4bL8CSoOeJjZafPL3X4KWLkcKm864UF8KHPp7MMpaNx3TQ488PAvvjiy0W0K
TjfHR2b64eGgyti5fN8pwOtdsbYNQeOr6CjQejEFj/5uNqVG4uEp+dGOvNdT
oDLpqp2cgIeLLUedn7+ZArHJccbl93hoSSt9yfphCvZExXyrzsRD2G3L8q3M
KQgo/yv8rQAPHCXYwbbCKdhu3eYyUIIHpUViOtqM4EtTZA9U4yF1B2vI/rop
oBQnkpib8Ogey8ZX2IayQEzzGTwe+L/Kf8ntmAKcob/a1048KN+ku+A3MAVs
EexuJgN4+FESE043MQVWX+yaZcbwQPfj3NS3+Sl4J7WV8mgGD7n8rVMB36eg
IvpCtsgiHgTaVvu+b0wBs/GUZcQPPHTcPDlBZpiGF/aGOa7reDhMMYy7yjoN
/xwWjWvpCNCp9szKiGcajB7/kQtkIoCa1C1REaFpMNgyWeFiJYDm5vbncRLT
8LDrlddfTgJEY3BMPoen4QDXepc9PwFeXDKT51CehtxgI8vD+whwwvf1WfcT
03CUnr6iVJwAJyO+el7UmYaRf21uOCkCjAazXu08Pw1fx/IXjsoSgHjL8FyD
yTT8ZMGKShwlgFfbiaNhN6YB++Tb7OQxAuAEV2u3bKfB7Qqb1HcNAtifb7Ef
uzcN0bjflyI1CZB62/qLo8s0FNxJ++ChQwB5G1Gx297TwEEalVjTJ4DbUshT
taBp2Lfur3XGkABWVmU+2PBpWLchOvZfIsCbEpbElNhpkBfxqWMyJcCjH2KW
yu+mYf/u4B+PrxFgR80U/4f0aXgrs15eZEGAhXvt017506CglJ3+2poADxlc
LBhKp2FG1vlO9m0CaD3VWlqrRvPxe8zC/i6a32cVjxqap0GPV47t730CMD7c
eKtOmoZzjdm1zU4E8Ne8PibSh9pXm9LRcCHAx9/PCHmjaDzirwZH3QnwDEzy
eOemwfcZVvaGFwFy7c+mLixPA7rdzgf7EsDdnfHM3T/TQJJWWh/xJ0CU4+jf
q9tmQPjz+StzQQQw1H1msco8g9Z5uaxQCAGaC4gYK64ZSFpyf3EwjADhmyCi
JTgDv3qFPiy8IsBPeWeldvEZ6Fu7/qYzkgBZOjjLeukZKPtexO8cQwDheZJP
1NEZUJo0yv8ZR4CjLgl6bBozEJ3SUBabgOpjMvDgL60ZYA5ScviVRIBY9WNF
zw1mwOqz2oLTOwKYikTLfTeeATUHr3j8ewLYTXPX4a7NAL/s8s6vHwnAG2O2
dcEG9Y9Z9at4GgG4JKuNtRxnwIBeQ1E0gwB4nc4E1iczYFEuOEuXRYBD53NC
fT1ngOHH8sjPbDTfx9KjrANmYK+6H9vnXALs23lbZ/nlDHRoXWUNzicAtlyP
/Wv0DFhWnyUcKCQAy7/e1uokNN4bP42yigjoXnRY/kTqDPzcuTtSo5gAukof
sg/lzsAX6TCdd1gCHD44RK7GzoAAJesGawkBSFmN87JVMzBn+db0ZikBaneT
BFmaZuDD6DWX4C8EML7+7sdrwgyoh7UuY8sIoBgaMRXcMwPHL33+XVlOALKe
fKvJ8AzEORgX51cQgGMx8gp+egYus1349qGSAEnOezYwizPAO/Nb9EkVAVon
rfS119Dziz0+nq5G4xk3D8nZQvO/fYp+E+XFuifj/jtmgT1kEB9bQ4CWEONJ
Ro5Z4L07z3m4lgBLSpf//uCfBe/nvjvTUC5pEqgJF50FjNZuC/46tF5nXjrT
HZoFHfpHFY9R5poX0xo7MgvC3I7CX1AO7npaeldtFsRG1CRWUdZ/v6Zje2oW
djWO2vLVE6BtU7TpmP4sXDY8tU8aZbr/64+EBtN6w9wAnDKc1zXpxkKsKNsr
qfUB2O7c9465Fwu/iOuTH3ZRwKnz74uHfViwWi7RthWkwGXHwype/ViQDZ7R
zJSmQJutYP6ZASxMz/z9u12DAh/+Hj/cgHI418bTpwYUWCVYDP9AORrjEOt0
nQJ/TiWd7kE5ozGzrMCRAhG7t2U6opz5nvhuhxcF0hjNM0pQ+/G6gzquYRRw
CWJz+Yye71JCzNl6S4ELNzn17FH/MG+VC5jzKfC8bE2jFvXf/vKD+BEGdJ/m
9WTnkMLAwfvGY7tYR+HxlOFIES8Ghr9mhWjxjEJEmKu4UTYGOv9+Hj4lNAuV
wR37x9D8r1/pTGiWQPPVfX9CF81nhn0vZfnwLKi3ejjFo3xuxNBLUnkWInL0
//aiPFum5mN/YhY8LG8YMaH53XWBlclQZxa+98Uqi6N8TXjPtSfnZ8Gvh1Vf
DuWCcuXqnqkBOB/9s3q0CwuXZM19Jn8OwGJwS/O7HiyELHzWz2CigMpzTWUx
NN447X0F3nwU+L7Z4HoKzUfkbYfee5IU2HI9kCaA5kuid2kntwoFmOPMVnJQ
3gzbVaSoS4EoYmM69ffqj7f3d540o0Ar79kn1N+zI56T7zbaU+Ciau3KS5Rr
lnk8m90ocPq97uI31P6L1IhYnxcUqDKyd9hAz499//4g5g0FDiVb3GtC8/2k
puAoOYsCL9yP31dA/dUKEcys2zYKm2IDZ4NkMHBf5thhrl2jwPiSfW5GAAPH
HwrdFeEahbpRvtY8XwzcerP9/l7BWbijdu9oA5rvvnAX2WzxWUgpmDl2BM3n
d6mijN/SsxC/fT4+COV8m9IRBsVZOPWM70AryqXNA3sdNGbB+e3Fyk2UpX9v
S7t6ehbsVxfahND8RoYlRZgYzEINU1zjYZRvFZ/0fctOgbfWmurlaDyHky71
GwhTgDSs+7wYjbclzSZrUo4CHHGWIfep9fib5fvvkxTY6bbnG7U+ReMWdOov
UOCc6bFBav0GbRVeTbOkAMFTgKeOOn/0fsxJDynwy7ditx7KkZdC6nWfofc1
8MDME7UfLtwQvLl9FK61KWNjxTEwXvAwloF9FFyG1az55TBwI3OTfU5uFo4/
DdTPROOZvzolqK8yC50Rz9KnUN6TFz9uB7NwVrp2iB2NZz6Vz05LdxY+Tp5M
k6TVV9//1lcV/HqKfz8yMQBS3Wx1n1B9FWB81+q+D8Dz4KFee/S+Lv/h2cxi
pIAA9iVuDb3PokWibSgPBUxL9iyKof429GaLG0mg9cvQIL8NjaeBYB8uoIzq
SSQg9R3KGAMu/G4dCgQx3uZbQDmr1mdF4gqaH12Tw9TM6GDbQLSjAGOWmWsi
yufiVRzSXSjQPFpzeAfKfl3zVf7BFHA18j8lhJ6XFhsy/TKOAnqvn8Z9R/3p
urj4vTiDAhau85jbqL/yBx4qFNONgtJd3IkaWQxwhaSTeZlHQWGR7e42IQx8
VTChsHGOAqaR+6neXbTeZ3KUdwrMQunqK20sqq8W6ZZfSWKzaJ+6t7wfzWd8
sMirTcTTxQIOAy+ULaW+RawqzILazzjdWpRFDWXmHdRngck37PUaymW4TWcL
rVm4dKK0RADNt1zjTZkzZ2chIWx3rAzKh+uSjqawUuAGe5hLLKov3TPbX5kJ
USDe1ebeGzS+db60n02HKaA9aaB1DY1fdznAbes4+vwe3F4Cyr2Xv1u+O08B
N2eNgJ8oh11ld3t5kwKev16141BWmuS1SrtPgSbpi9PmKAuv5xRK+aD6uuX9
PgG1//SLAMci4yjczrjV2CmBgcDd4xo72EahCKv8TFIQA/TMDj+/ys5CUf3Z
fyloPIlCgjiVY7PQdHbf72GUfZXmCm6fnIVXTFUlu9B4PDw4j+mdmQVL2wNh
EijXTJvU+BvOAmvZnrdUflmuHXwZepACJ096kY6g/gSOuPizqlFAP0dG+AvK
OiT6OFN9CnwzMp5fRTmJrbnYzJwCK1e+Px1GWSj9BHe5AwU6h1+ZeqHcjmsI
YmcZhabE+2V4fgwk7N/RY6w9Cy9jg9+JoOf9Mhn4aXNuFnqCprNlUWbeFnVv
VZMCPv63Uqjt3emfkJ65iHh4P2Wa+jzvVBONGisKCDb77/uM8slLW8tbaL1F
KWXXbpzCgDl5b+xxvVk4srnoe5C2flr+d/3kgcB1Ae7J8QFw7Hx2OQitn+Ff
UYpFqwMAc23D51A9qtNpm+QwUEBN0TdjHNVr9enMmtfcFPjNl1nFid7H8Ktz
eqf2o/f17ZfrD5Sjzx4gCylRwM51Kiqeuh9Kxw78PU2BXTs4jGZRzlvMpdtj
gtYfo1TEN5SrzPOXu2wp8K7e9NIHlLm+6t2Kc6ZAekbFJW6U/y3wdwYGUeCo
toL2YdS+HKdPo3ssBXRatIuYUf0FCIZ1paWj9/G84ZYf6m/aasLPw2j9ZL6y
+TqIeGOjZvkpbucoVBzUXWDbh4GGyEfcgRyjsBAiO/nKEgOs4b5vvPfMAn3w
hYJctH5qfj+k8KL1s5i9t3Afqpe7Klf8vNH6ybgzEOqG8pfnwXN30Pp5lu52
vBLly6+NLy6g80iQPd/ED5TpVdZvjKPzyEDxe749aL43R6vdqtB5JEexY5x6
HuFsbQ99z0KBxwK2qf6o/5cTh+du7qVA38Jn51A0Ph7imb2lMhR4kL1X/CIa
P5/jqXJ6tH5+9JN0W6n/f1bR9X7YOQpolLNfo66fiKDjwT43KMDG9TyfjPJi
l0V49j0KKHkcmrdGefJ8VQa/N3ofl1TOZ6L2V4O0u+zQ+imI7aRfPYCBnqoE
9hfovNBxXUAhlQcD3aUps/fR+mk76lKThMbzw6tYIh/t//tuigdQUC525dwz
i/Z/Rxn1lzvReOom2YXb0f6v81T2zn6Uw+lL2DbR/v/5kLIndf2457cWekpR
wOwd3uYA6s/la4pNu1VRPVxOlsFQ95v8oE86ehTgLh5zWkE5Rf1nvcFVxOsn
+0XHUe6JC4aaOxQw36aqG0hdT55eVyPQfjsZbzQzsAftL2GMVT1oP4xgYT0h
jJ7X8Ejj9BDaD0/3T56irp8+zwsFP4ECuk7u8wPo+9qlt1W7jSiw6bWHhbq/
+XX4n8XcosA+Sq5mBXU+t5XWP0PrR6tuuziLKgY+aAh4V6P9R8TaOlGK2j7f
JW1+9Q4YT2n9bMVVAn2O4dViZygQGf/zObWe06IvjiuYUiC864Ybtd4tM/8O
4RE/GY9tHKPuz25PWpQ3T1CgO+NYRgf1/OL8wLjQkAJJ/5auUt+nkuWhO4GI
Z+VZL/xFEd+OcvAYNiI+nWL1fX8AfX+17YcTywU0/xZfsqnz67Di/eLOWXTe
zJFgp47HYx9r8UvElwO5jlY1fGh/UHfP+Ip4Yjn7loH6efXAHumlUxRoielj
p85v+LrFvj+XKDAs2XefOv//Lx9K/5cPySB9rtrADvEhRZ6L3hXxwSX+LfkQ
4kN948/ak2i95fhTtskiPhz/8GK9F/HhzCLvIg/iw5qH7ktmVG/zC0KUL+IU
KPw1uUk9b3k+93dKVqTAnpcHlqOp4xcwG3uC+JB63AU/jfKR7TrPX1+mwHr7
v4+LKAsadwWZIj5Y9Y2mpqL8M4Z8fTfiw4qknS71PFjhKjfEhPjweuOcjBJq
38nwj9JyDDpfr3K/50Hra9B7sEEE8WHN7H7iK9TfuiLL/I6tEWA6+OvIXXm0
/l9XhJkhPtDdOLI3GvHhSL1Pvibig3EIXuPoNQx433JoV0N8qFzvH85EfKiw
aDzfge4rHUuOIYLU9f9q5SkgPkQdPSzpgrLdl66YA4gPcIAkX47yYtFMQDbi
g/hCceB3lCW//iZ/RHwwfH9Mkx+9j4n7D995ID4IGV32o/Ih4Jy1qjjig+j0
H1EP1H+KjgH/OLp/XGs+bxGAxicqw593BPHhSsvPVQMqHzPfXQ9A948o7/W6
Jup62q/mzIj4wCRzUIpaT1xvO9n/oPuH2olXDF0oG+ADJOQQH9K7lC/Zo9y0
dubTK3T/8GYZDChA7ed+u3psP+KDqMkY+zNJDPjwra3pIz6M9sayHUb3iSqO
4+PyiA8xj7wSE9B4UvK2kR0QHyYHOev7UTZ8k2qQgfgwvXnl4Q40nuk3bJEv
ER8e7blCpt4PnkTcVipFfFjHztlQ6zGIJUH7Jzrfz6n3v6L+e5Ljb17ffo3O
9/bbHvMXUOszWS+7Ap3vQ7Jb45ZRFr/40qARne93hKp2TaCsGJHTrYX40Lwq
euAFyo2d/VoXER9Om0Tfu4XO40ynGY7GIz4IZywH7kPPy95auPMG8UExcgcT
lQ81ZbkXXREffkWU/uij8jX9EJxDfNh7kdubup4Y5wQ7DiM+bO2+rlSNstpV
nlwtxAfWxylpnIoYaFrmX/VFfBg2bRCn8uHMdaOmeHReJJZJmn9Fnz+YPXsn
G50XTfNuDM5Rz0MqeYwhiAc2HsRZ6nnKskiy1wvxIGZt1YFE/fc4tgrmBxEP
akQC3Knvb7Ak8NIZxAN5edL0fhEMXGnkqgtCPFjRPyNA5UG/WeqbZnReST5X
mEadz75RzYhRdB4h2OUHfafOl7P92/OIB/8sydy66Lyxu+UQMQPx4KU1ywB1
/OL1SriHiAeTuSGWo9T1OCcm8RDxIL/ogDL1fCGq0dUZpE0BjCK2ktr/w318
7slo/1Z7fNqeOj5tbextPnSe467i8aD2lz7q65sMVC/21aSqW2g/SX/CNAOo
fw2OS+HU/hVVN7wlIN5ryexWo7Y/NBEiJIb6I8Iv707tT09LqsJNdL7J3afr
T+1/eFDuOXV0H/lr5HuA2r7GYMhBJcS/zvthOdT2NrdV+q0i/h2wLfalvi+t
nJZnR1B9mRklH6T+vShLMp+fMTqv7PoSRa0fRW0ueynEs51+SxcfIJ5p3fmQ
MrUyAE9yXbNVEB/sdKTMvtGj8wTpdVIH4tmL07iAHi4KxOHuOm5H62NZIFDC
BfHMJiaiZB7lh+lHT1sgnmXRveCPot4XOL/YHEE8k1A5z0jl2aMIjnOGiGd1
07aS1PupHnGavAfxjP6alH469feD+Rjz9ifofnnmgLoQyomValbNgRT498Zg
jyr1PHDvs2M24tnxj90cgogHOxUYTwymUeD+95Ujsai/XgIunK8Qz4LYIgyL
EM9GKxzo1RDPzkzwy/cintlRgryEEc9uVZ3m8DfDwDEDCxt+xLPHdfo/0hHP
1KOWggoQz45vGP/cQ/09RaP6twjiWdpx0soTlCsubtxlQDzbHYmVKqPeD+oL
k0MRz7gSPLqpv7+UnvkdGoB4prj7RSf195cebEuRGeJZicsNIyrPTrDnh4/v
okA0M8HUGfVfOHFb3kfEM4cjT/C+aHySV33WvkpTgIGSbKyPxr/aYiirg3j2
sqjPvZF6XxBM+F1tgM4vZy23U9+/8cF3HVjEs738vJLd1P1OP+7BkiMFDFLr
fRxQLj3H8sEA8Szsu4gA9b67673N7W2IZ1wiJyJaEM8ua6U6SqP6rIhud32A
eIapYLbgQDwzv+EV/AaN59eZg+l6iGeBVQ2jfSjvzXpg+xzx7MXW4Cj19w63
H6zn7iGeKbh+96fyzL63WjcW1Zu1a5gptd5eqtGHFyKepZjFvaW+zyOlmqqX
EM/kqz8G5VHvC7GZcm6IZ1MGtuLUerQaNN3th3g231WbNknNrNWijIhnvuoJ
bKEoJ2wFlyggnj3OzMr5hHgW/5b+qxvimbPHwkEqz5LPaHu5Ip5Vlt6app4v
ivuvi6sini16SHzvpd4X3oXU7UA8qx2rzqeuD50n0zFz6D6vuFqaVoMye2Cd
2H7EMxP88tvoIxgwM+DPuYV4JnX/3yT1vr1pXKh/GfFMcPdUGfW+e+dYsaw9
4hk61gfNo6zuzbTHHvGsm42+hsqzy+Tu9JOIZ9Z/E3WIVH7ciByaQHyoc336
jPr+CiYUmyURz+yixc+novvsrAiX523Es76qok7q/Su87z13EuIXUV9Yg7r+
f6XwcckhfnH+dLMPQfyi3+03HoR4MXQ6tJ7KC77xiSQFxK+/EYV+I1R+j/ml
yyB+dXt7RVD50ntU2VQL8Utz3zNmKr/uWY8fv4b41fv+8z8qvzY0+BbIaL9U
KZO99//Hr4Tym+v7EL9S7kkEUd/vnZIDYiGIX7vyYvqo5yWS9IT8Fpr/TyZC
N6n9CathwgogfhmFtrVS+6/jzU76iXh+O9BYi9r+P/8kC1nEL0OD4P/hF+bP
PqY8xK8wSeaz1Pej/F00hh3Vk9b1Aj7q3/fSb705gfglVTLOQH3eHZm+FT3U
34/xJaep7WXN6/nfQf3Nqi5ImUX9faa/W2wAfT/pjdgj6vc38lvKI9D7Z8cf
0aW2j7lH6nFE/XkVbeJI/b7Y3AjrAfR8WyITntpfoWfk8jY0v/DNbok6nvBz
lyfN0ft7vFT/P+/PXCOiYAY9z+clvX86eh/Fsnmdt9D8PJSLjf2f/oafa/VG
vOYNcWGgfl5n1/WtY2j9yr+SLKI+/5b0+V1D6Puek0mVRHQ+/b/n2yugUKcC
5eMyOZwGaH3+3z4S67PzdCKhJRC7bc8V3V22cLyyIWWlrQSEHty+i/f2BMsH
GT3+zKVgUvlrkEgJgpCbGHNrdJ597/ky1HrjFYha4uPKX5aC+tMtgrZkNFQk
s++/RS4FlYXx7SfD4uGcccXpJp4vIBH976RXYxLoC7rv+2T8Ba5L9+yGCylg
IHxDhxj3Bc57ED6ev/oBvigZST7u/QJq3wMu1it/AqHa/KQe3jIIp2M1WPiX
CgEhx24FXy0D/h9zv0Qm0+GqHW64IL4M3j6snNz+LhMUfV5kSQ2VwYf8ezty
n2QDPTuG5aZoOThUBYn6quTCifyFA2wW5eDjMXeCszMPvMMMwpk/lkPpu8fB
DNoFIONdlu89Xg5mtS2nP7EUwlC2kcgpqQpwE5dYshkphIALxhL1DhXwSsN0
nJhVBHHbbccrMytg+Ogl9UIbDBT8fru4fbEC9lTEufJLF4PyvylMk2wlPCFK
Nb0bLoZ89wR2XcdK8FCucpd+ie7fR11KeAoqgclarSRb+zMI/LUUuLZUCQvu
3GYO3z7Dru2PWxcVq+CRk+XLtJQSWPJbYddyrYIdQsofGNF7OMXtw8b+uQok
102LMudLIX5U0VxqvQq2rLqTz0Z+gWs1axZf1KrB1jlFrUymDLj5Dm7scquG
W687s65VlwE5w2cys7waND7jMp9dL4eN89NBtevV4LuCP2L2tRx495RpRInU
gE3XRS/DwAqwjnzO4Qc1wBU0W+bIWQnZumwFpJs1sFRm/ulCfCW4JKb+avSt
gcn7F9hnpKrA1a3xjWsK+rxb/PC97CrY+P57glhXA0pijpWGKtXgnjX+O3iy
BtwPdO7fXlUNsvPGDpsMtbBzjakGI4Se29Lnxy9ZC5+evG+xRM8hy0+tLerU
QsfCVd7ohBpQ7UhXkbSthfe1IpORXTUgzu0tzBhcCy/2mKtYctWC1hDlVnJa
LWRwcdJtN6iFKZ3z50ZaauGx0DONS+hzfnNPtvnO1wIpWznyYW0tmPBJcA8x
10Ga3mcPzK9ayB6bbh+VqYMVaBN3lq8DlWMKYykGdSCjsznpZ10HZw69ervj
fh0UZ1zn/pZQBxdMP0oQXtUBvWRB5jVSHbxih50X8+tA+026zrVt9XDRZjHS
g1wHFfl6714r14P+6QMelit1sK+z5pqnbT0cv8F1OI2jHioLFUyLouqhkJc7
MPJoPeA2jM9sNtTDDdNEdY1L9bAifz/o2Go9hKqoxIU8qYfAkdMfb4s3QPGl
F1VqsfVgXR6wf8aoAbjXrLRSsfWQO2YuF/G0AX6oGd0r6a2HyJVrdByZDcDK
1PgjcK0eTt64UdPT0QDCbMtnivkagJO0VCO50QCYIjnNF6oNUNXfNCMv2Qje
Yz9iBM0aYEdb4b/C842AyyNEXvJoAA3+Y4Fdro3AU3LTfD6xAfx6/3r4pTRC
pJ6L98nyBmicZtXub2yEKLf3+mpDDfDR2+cA9lsjtClcfrS82QDEHl3XS1xN
EPBCUNNQpBHidWr8bqo1gapQXD/LqUbQZ9I+wWvRBOKqicRAy0aoZqYrK33W
BK9WixzT/Bqh4CBRsSitCY4eu2Tn/6ERlO9Nlea1NAGxOF26prYRTu0tCPeb
a4IlMkfsx4lG+JpSGhHD2gw6bttunmZogiKG5Vzy4WYQrtyOf3GgCX6KSG2q
XWiGleM1TEd0m6B7Pl7o6cNmWNehfxtph3KozyTzq2YI+mY6kPi8Ca2706P5
+c2gJ6z85FZGEyh7WZh8xjfD9pCWvqDmJrjzluV8+XwzaEc/mLyE+tHW5C7Z
wNwCX6SSz1F2NkPlSE7GeckWKLw6em2XTDP0p67StWu3wAhPVvPPs81AaBGU
HLBsgZ0s0v80HZph5O7Z/o2nLYB5V0k5+rIZVFg3/m3Ft0B0ZR/vWHYzeJE4
TmAwLfDbfceaMqEZ7A/JeKuTWsD00dcP80vNMC2Rltm90AJfV8yyr+1uAbnA
vbzHt7cCA2e/+WOFFqBP48u2E22Fi19G7XQvtoCUlB3zXbVWeJOUfOLpwxaw
ObnLMeViK9gIPyw3iWwB7y2iZ+jdVrA91BrztbAFHjJZHrjj3wqzHcr80l1o
XD/feiwntYJdiZl1888WOJ4jqZaFbQXBAwysYrytsHzsp+19HHqeQu01MZVW
oLOOkSdOtkJVE9PO4SutYPj2W9mZjVbIW7e4dsodfa4jTtuIuw3i7zxwZ0xs
hScCDgZJ0m1Qeovph39ZKySuJ2F5NNvg2u8C3qzBVhg6r1bAbdoGSnsmol5u
tsJPwxmts45tsONx+yBhbxuwJIjV9/u2wQ3HZlzJiTY4T9h4MRXbBnOLZwVu
3GgDMZsHMxrZbfB79zhrpk8bpJYPMTPVtsE2R/n2y+/bwG0FOyPd0waaFxmn
K2raQFp7b2jOXBvQd39Nbx9H7bf40L351wbrY9ebYunb4WEWa94CZzt8PeSf
XyvWDqaz8vQ5Eu1wi6MSok63g2C2FhBV24HV1/uwmHU7jH5ii7M3aAf1cOMa
k8B28JT+cvGmRTskHygoOJPaDqtOHNiOR+2wuVZ3N66hHUSkOjKq/dthyH4O
Hz7dDt3lisH0ce3wwyrupRYTDj4pwKWOjHYI3zBbTTqIg/xAnuLV8nYQJ5LE
Tc/iwE26an84oR2+yZDy8Xdw8C96B3PDCHq+1MTEfCgOlBcd7XVW26Ey2+tJ
QzYO5OiPmNgz4EDjLoH4tw0HmEnGAB4elFuPdgx9xUHCmMu/HZI4cCoQVvBg
xcNpcfnUjGM4kDkmrFIphweHwiaZMD0cjPzq3GFphIdB09pff6/ioFWTU7n6
AR7Gj/H3STrg4NghK+bG13jYeF3ZGfEUB/0J6urBhXjIPeORVYr65aLbqpxJ
woOJPRi7JeIgNvJu36NVPETQMSq55uDgq11M7y9OAvi5ZwqfqMBBY3+Hl7gS
AX7bZFRr4nHQ1R3nu+syAWJ/pHpwDOFgiJXb8NJjAjBmLCz7oHHcGX9fpxlD
ABsJ+crDf1H/T5VGLRQTQNM0xz0XjevhyXGWE70E8NK0Mri7Dw/5LnWGi78J
wK7SyYGXxYOEqvTitT1E+OaXPc58Ag9C8alKD9WJYK6mvD3wPB7OPsvo1TQn
QklSKNfIdTw4pd7SeeROBBGWpc7Ju3jYZy9nrpdIBB75hm0ynnj4h/Frp5QR
QZ2zJ8skFA9WyfMTvEOofQ/ZyLpEPNTU72zO/0cEnSPBhqPZeJBWM2Vg2E0C
LpvLxjNlePg8gnHZJkoClzweT6V2PAydvbxnWJ4E5/Xs0u4N4EEn0JuN/RQJ
HtYeVV2eR98fYpj9dpEEHKtfFWQ28JD1B7ecfYsELz70JprsIoDjlMj5SicS
DJBm1ImCBGiN+dyb40eC5jM6V9WlCfDROkP3XCQJxM2H6azUCFBFJ8ECH0nw
Y8gucUSfAE+sJjZ3Y0ggo1+UZ3QVtRd1WEupgQSOifM2+xwIMDZGctzZjfrr
E9Sb60GAlR+ljWWTJBjXch84GkIArV5pp5qfJLjBmPpMKJEAct6j5z5tJ8Od
KP1PG1kEiNNaYVXlJcP0iPP1lDL0+Z5QURFJMty9WFqJaSfAczkHq0llMuwQ
6NSsoBBg95WOtc0zZJiLfEXR+EYABS3v8u9X0OcrnvUU/CUAySDQJsGODMS7
yTtW2Ijwn4+fdmekoViESPPxVS2YeB2PEGk+/nCAhEOhFpHm4z+6o78Xd5lI
8/H3d3/16rUl0nz8ne95LX3diDQf34bj5OaeECLNx1+X5NwZiOriPx/fwgxz
8V0ekebjm4/cXvpUQ6T5+AzCmsN2XUSaj5/azFyzc5ZI8/Ff7NG6GLFOpPn4
jr2sRk92kGg+/qqjtRwXJ4nm479mcR1K2Uui+fgWtTcd9kuSaD7+8umLS9xH
SDQfX76+2mmbBonm42s/77W+pkOi+fg+sUdF0i6QaD7+0qcL0+vmJJqPn5e3
7lNiS6L5+K6c5mIvHpFoPn5nk2zGZS8SzcfnSTkR4/ecRPPxlZxCdLujSTQf
P+n4Z97nKSSaj79p+ln5SA6J5uPrCip/Z/tCovn4G2KTDjqNJJqP7yY5VlTT
QaL5+Osm3j3HR0k0H99W66MpyzcSzceX9J9ZU9gg0Xx81sbvXek7yTQfX2DJ
LieIn0zz8R8qv/BwRHX6n4+vJrsXF69Epvn4jWw7Tp7RJtN8fLGkwOBjxmSa
jx84UvpQ0opM8/FlCssdCp3INB//U7XTeWc/Ms3H/3YiTmk+ikzz8Wueno19
mEqm+fir8ulxEp/JNB9/d0KrbGYLmebj061Hfb6C6vQ/H189W82S9SuZ5uOf
7p4tKN4i03z89tAIcOfqoPn4ScwRN8+i/J+PX1Ut+iMG1fF/Pr7eGQdXZoYO
mo9vPq/1aQDV/X8+/nPrxBHV72Saj+9zunfbz3kyzcfni22S6B8n03x8Ssgm
41kKmebjR/fP8Al0kmk+fjJTcMWTdjLNx5e1yt/9u55M8/EF9jUM9peTaT7+
C7edy7rFZJqP7zkdW8qTQ6b5+JvriqeYP5FpPn5tWFLtiyQyzcfHq7bAnWgy
zccfd30f1vWSTPPxl+7Vc78LINN8fNEnH4+99iTTfHzCmT8Udmcyzcc/O82y
7asjmebjp1/Z/eyyLZnm49vG1xlO3iDTfPysQ0fHOk3INB+/4DYxwNCQTPPx
3wmOHTiEuPifjx/83UdS5iSZ5uNnRWV9KzlGpvn4ySdj1j7JkWk+vupuynsh
KTLNxy+v0bMoFyHTfPwuEZsPZaj+//PxTW8HndTmINN8fLcM8zg5tF7+8/Gj
+UP3f6Qj/x8f/6PSx5N/SDQfn/HYRzGNFRLNxz/7mz2sdo5E8/Gr9kfIZo6R
aD4+YbO9o6SfRPPxjzG17jNC6/s/H//9pNaofhuJ5uPHqLFI4OtINB9fZH/q
ftdyEs3HX06cGvBD+9p/Pv6W1UUiP+LLfz6+Xa5YAfsnEs3H3xPx/sbhJBLN
x++wOcfQiXj1n4+vazjaTXlJovn4jiaXvO4Fkmg+/v3GxsBbiH//+fiqg1rH
PZ1JNB//Uamvv8h9Es3HlyY8vXvAjkTz8Y3O3qzF3CTRfPyb16J97E1JNB9/
RX6/kC/i838+fukF2ykRPRLNx0/Z+alaXJNE8/GjV4O5zqmSaD6+ly2H0V+0
H/zn46sPvB7kPESi+ficit8U8sRINB9/1sik4qEgiebjM+z9RI7lItF8/J8M
IQ+1WUg0H3/5T3y7CQOJ5uO7qZr1Cq4RaT7+aI5TVjza7/7z8WNPBd0f7iPS
fPxZp9/+R9uINB//lxFhwRCds/7z8St8ZFNLsog0H9+XS0FBLolI8/EDw2aD
7r0k/h8ff+bR/TIvIs3HP9rUf8D4AZHm46+XmgtiLYg0H1/JVENK4iKR5uOn
3WInXT9FpPn4q8yY22MKRJqPr1wQm+S0n0jz8VVV0sbw3ESaj5+ysBGgvJ1I
8/GjZQ+/mf1FoPn4Eos/ZO1mCDQfn6XoT9ZSH4Hm4w/xbjFqtxJoPr646I+d
n9D56T8fnyfj5NkLOQSaj+/G0d3bmESg+fgZXOEJuuEEmo+f0c66PcabQPPx
HYhzbbIPCDQfv33/kwtkSwLNx9cun1/QvEig+fjz8h67yrUINB8/drs6iy86
x//n45uduBvBeYBA8/GTf3NJ5vIRaD7+u2M33/DuINB8/N2puqyta3iaj/+3
56ZQ0Bye5uNrfvB15UDn4f98/K9Xh5Q+ofPyfz4+z6U3Mdsr8DQfX12ttL4w
B0/z8Y1Cv4/ZJeNpPj7j7Znd8+F4mo/vo5z03dkXT/Pxj9z6LX/OCU/z8cM5
vk0uW+FpPv6whsD428t4mo8/+J4jT0AHT/PxK0L0lkaU8TQf/0JeOHOeFJ7m
43eO21032IOn+fhCLK4XlpnxNB8/sp7vzMgGjubjFxjlUd5+xdF8/IiRujTr
YRzNxzdq+G3zh4Cj+fiLpddEY2twNB+f74lYoWcRjubjv9oekqD4EUfz8SWE
rvOvRONoPr6f20lNn0Aczcfv0bhibuqCo/n44XUeScr2OJqPv9q5d2XSDEfz
8fvspo4loHvsfz4+Yys/3ZvjOJqPz9L74+QdWRzNxxea7/l/2Lvzb6j/+P//
REIRkiQkSUJSZCs9tEipJKW8pJIkqWxR2lBJkj1ZsoQQQpgZ+zLGvu/7NvZ9
qZQW8n32Pj3u3ufz/hO+9dvtzDDP58wkc07Xy3MF2lgJPb5/67D/0OpK6PE1
uBOLWxgqocdfMZPLV018/sU9vja3oI9ffwX0+BFbVH5caaqAHl9c9dur+yUV
0OObb/6SeSW9Anr8i+c5r5+Kq4Ae/6y7wBfuoAro8cf8ZGqa3Sqgx9f75Uka
sK+AHn8hg7uxyKJiqcdnq+qLu1wBPT6rfurDKzoV0OOPzz5TvnqwAnp8Lg9Z
B7PdFdDjrz0jmXxQvAJ6/G0B25VE+Cugxz/7wvK+OnsF9Pje5PUr0K9y6PGj
X557vmeyHHr8/CDtt6u6y6HHtzr03k28phx6fJ8fnuwH88uhx3fYr+Ygn1IO
PX6+6fApichy6PFL+NaYfvIthx4/e5PoNibncujx+4OmB/nsyqHHj/7x6hDD
9XLo8bl/5t8c1y+HHj/2kkmH8Ily6PEf+h/WkNhXDj3+goiisJxsOfT45+cd
VXk3lUOP/5A/K1uVpxx6fJNpZg1T5nLo8R3qmO5c/1oGPb6GKaPDjeEy6PHt
5sueUdrKoMffeqPEtbm8DHr8eyzXOL5nl0GP/92mvGUmoQx6/FPbBKZH35ZB
jz/+JrtT0qcMenwFw+U3Dj4tgx5fc/LZ2HnbMujxN7Fknj5uUgY9/tlxkXin
c2XQ41tJugZkHy2DHn+P5uPSSpUy6PFdS1sMOqXLoMdnFeB/LLexDHr8XWt+
oytcZdDjh7S6sfksK4MenztBlxL4pRR6/IzEh2yjA6XQ44+8WMeh2FIKPb7V
zd+aF0tLocf3vJfD5pRZCj3+tj39R59+KIUen7rTb2V5cCn0+NP67l84PUuh
x9/x9Rp5u2Mp9Pi2tntvaVqXQo//Oo/lWKJxKfT4r247n53QLYUef8v+0mUS
R0qhx99gYyu6T7kUenymvEX7IMlS6PH5Ngdv/iZYCj3+ZltLbynOUujxzVSW
C1xkKIUef5S/zqnlcwn0+MaHlq+SHiiBHt+ox1PvUXMJ9PjSxb3L40pKoMev
SpqKF8oogR4/xNCa5v6hBHp84gegW1twCfT4rx/bBm7yLIEe/7LyWKi6Ywn0
+O2mWveSrEqgxy/5aYXWGZdAj3+9cZuOvm4J9Pgy55zEAjVKoMcf0/W5LaxS
Aj2+TbyeoaNUCfT419N9M7qESqDHH/ym9GXd6hLo8Y+u9qUGMJRAj18mWxrF
+6UYenyrWqecWwPF0ONH+vXk5zcXQ48fxHSPyaCsGHp8q1v7Sxoyi6HH7/si
LH44oRh6fJbv4Uf8Qouhxw+rVu2gexVDj/9cI8jF6mkx9Pg33FuO0G2Kocf3
Z1wncfRaMfT4R7xOnffSK4Yev3Nna56Q5lKPH6LXNxP5v3p8k0rBYnaZpR4/
Npasaiay1ONb8mv6rF6z1ON7ou7WV8xLPb589BFr7rki6PGVeSNVzUeKoMfv
CNgxz9VeBD3+qYiI7PjKIujxreTrF7bmFkGPv1XMe11wUhH0+OXccZ+mw4ug
x2dpGwp+8aoIenz2YrnaDc5F0OPvr1Xl8bhbBD2+2Uol0vfrRdDjs3DyNsQY
FEGPP/ow64SyVhH0+Iu9KW35akXQ44s/m/stuasIevzx3/T0ts1F0ONvEuLf
7chXBD3+Kbn3/itYi6DHF4vc6uv8sxB6/MvqPo2ak4XQ468fWHt4prsQenw6
x7nl7nWF0OP/Z7hJbmVBIfT48dX2zo6UQujxBw3TFlRiCqHHl+ru294SWAg9
vsedMkUzt0Lo8c/MlSv2PCqEHj89gtEq0KIQevxn3rkKmkaF0OOfqf6l2nW6
EHr8L6tOxpkcLoQe/+XCLMNu5ULo8XXXafQNShZCj28gsqvbTagQevwdJyfC
+FYXQo9vy7j8yiBDIfT4XWw9X2K/FECPv+tB0utTgwXQ498xce6ZaimAHt9f
BXXUlhdAj1+FRnb4ZRdAj/9E6Fq/9scC6PG/rV6QnA4rgB5//0Jz3JNXBdDj
z1L6c/SdC6DH758ix/PZFUCPv+A35lpiVgA9PrdqlYOBQQH0+CdVPAQVtAqg
xxf0sr/IvL8AenyGnMLF1F0F0OPvNzstcnFLAfT4VV9ngo/yF0CP737hZt56
9gLo8RnTPNd3z9Ogxxf2dDn9fIoGPb7Nj88LNnQa9Pj3bbn9zzbQoMffb/Xi
nFARDXr8kHe3e1vSaNDjTx20qbwbS4Mef0vZEzaDIBr0+AUhBiVyHjTo8bPN
XLZ/cqBBj89/wng63JoGPT5lem2G31Ua9Phekgcsrc7RoMe3Lf6+F2nSoMff
9I5B9sseGvT4Z3uG941vp0GPr6U4uKFZhAY9ftzxc1ff89Cgx68qvKx3YzkN
evzGF1rCt7/nQ48fpV7me3ksH3r8dxmdFge68qHHz11xR469Jh96/GdaxxUL
8/Ohx7fZpfQpn5wPPb7ou+ct0dH50OO3UXQyHgXmQ48f2aKxuOdlPvT4o7ys
q/c9yoce/5O/UuNOy3zo8e1fmR3gMMqHHj82XONA+5l86PGd264UjmnkQ4+f
r3V+V79yPvT4mQm6U5XS+dDjr7cVrAoVzoce/8Qrv/1krnzo8Rkebs7LZMqH
Hp85SPtd7Fcq9Pg5lQa3XoxQocc//7ui8VQ7FXp89+8XKBcqqdDjp5ZuUNTP
o0KP38bSEoiSqdDj57XE3F8bSYUeX/m2lYeMPxV6/Mmj9ELZF1To8bO2LFfc
/JAKPX59QDHj4i0q9PjGrFE8woZU6PFtj73esP00FXr8/vyCvC3qVOjxixjv
K3MqUaHHz8pTJCtLUaHHF5MaZz8pRIUeX3l1+dfTXFTo8W1nqj8dWEaFHr/c
f2PegbE86PH3LZ43eVabBz0+e8y3pGByHvT4+u+SDXze5EGP73qre+0F+zzo
8cO67KkJRnnQ4z/5bqrReSQPeny1M8UX6dJ5Sz2+aCAnjScPenxpG3mJbT9y
occfW+d8yqQrF3r8duMRH8eCXOjxHa0Djlu9z4UeP/fcmdfDL3Ohx3eiq91W
sc6FHt85PUHT+Gwu9Pi7JO7ZmO3NhR7fKDf2/VfRXOjxZ906T+mtyIUe31xo
osZvMgd6/CeFYtIJdTnQ40999V3/Ni0HenwJ+x8da0NzoMfXE8j6YfwkB3p8
AWYnSU/THOjxtaY9hXyO50CPr1VzjF1gZw70+DzHb7x4uC4HenzZwqmj6b+y
ocev1pY4X92bDT3+mAa5z7Q0G3p8sbcSW7vis6HH5zz5GUm9yoYeX1NS4sHp
u9nQ42vmLGgzGGRDj9/KpffQ+UA29PjaAl4aw+LZ0OM3H/bcuokjG3p8fkPS
KoVPWdDjs0br6tU0ZUGPr/Nmn8r+7Czo8ck061CPsCzo8V2o5/TIzlnQ47t2
uc1duJUFPb4kR5xP/6ks6PG9gkXY9itlQY/vu9K6575gFvT4Pzv7cpUYs6DH
txSanK8azoQe3yjzPz61ykzo8T+fTNJ6kZIJPf6TNUVcZwMzocdn0DwszmCf
CT0+zYqtz9E4E3r8z1d7T/ccyYQeP+DNLWneHZnQ46+SHzCoXJsJPX5oNsoy
+pkBPX6w9cCKGnoG9PgeE4MD64syoMcfqNqmOhKbAT3+b70xVjevDOjx9T7n
dXPaZkCPXzx7edTkfAb0+H5J/Z/2H8iAHt9kqvj+vHgG9Pg8Z+LyX3JkQI+v
uXzb2M9P6dDjRzo9kJtsToceX4D6Lp+Ukw49vnB/UKx+RDr0+MYHvQKaXNKh
x5+9e/nAzlvp0OP7Npp3rNZJhx7/N4vrMppSOvT4Wtn2BrpC6dDj/z5XxJLN
lA49fuK2arGosTQ0gVbPJJ8aQU/EdcYsatLQ+asbdwb/96fP3PySIzUN3bCe
3SBrNIIOndKUc3+ThpQ57/4IMhtBsg3pVp4OaUjXbcPUHesRJKLKz2tskoZ4
Pju5/bo/gjRHz8hvOJaGBFW4Dkw/GUEym18/iNyZhga5jo5luhLHs0mt5yN/
GvH39vBe2VcjaJnmolzoQipabmkSxRs0gnjs1fZeHEhFF75rpke8G0F0Jg1f
xrJUdHt1Vw5r/Ahi8O2R3JqYilpYvdu7SCOo85DYotDrVNQxyhZukD2CzOs1
A77fS0XbEyLtNQtHUETU912RhqlIRI+Zpa9yBJmErf0kp56K6ry5HU81jSCv
gx9y1CVTUW2CGrds1wjKLhflk+BORZbJ8sfTB0dQ2LYfLNNfKeiCv2box8kR
ZHgiUsO5k4LYVnH2238dQfYzH4TfFlCQrqlf3dwC8fxszl8MjqGg6Wi1lp7l
o4grvSLXzJOCJKs+OltxjiKFqzqDQjYUtPlJpUQH3yjaW/CtQOc/CjJbv7KP
JDyKHn43WnVOjYJOBXCqK2wdRU77u3bs30JBzj/k8rbuGEWmpxse/1xJQfdG
WaQ/KYyim8In1u7+QkYc+aEHjNEooufsmNVtJaPp+3qWhzWI3cfvrZ5HRlaC
LRr1J0eRhDetaUMkGe0Pu6tQdW4U8eUph1BdyagmpWhd2KVR5LZyhd2QFRn9
jm+NEDQdRZVvas2+nCWjBy841FktR1Fq8RrLalUyCjixwjvEbhQVv/Aa9RIl
I5uwxBr2x6OIl7XQv3EFGYU03d0y7DKK7nM0Df7xoa99Xr7llvcoary4V6Cn
gYQcPlH2GAUS54OWkaMySUjXYY36jvBRZLTFgWMynIQqZ3d/j4odRcG8h7MF
n5OQ1/H7tJfJo0iwwObyenMS+vryqcKGzFF0sUEo7bcOCa3XVwl5QhtFuV9d
Jo2VSMiVfc2G/8pHkUjYxlj/jSQUHJF0oK1+FJnvX+5MYiaheUHLx6Xto8hY
/nhi0HgKmrefvX65fxRpDfzUuVWbgrIsxNXrx0fRWfHLcXmUFFRy4L5iyhfi
+B5ydHYFpyCbBZ+GPfPE83O79efg4xRk8abKWZ55DJlt2pGZYZqCJIop0stX
jSHzL8XpHNop6Emb0UMH3jHEz7ye5/juFLStZme/qeAYEnljHqormIKs4ou+
/BIbQ74xr3qOMqYgO/4VcybbxxCL7AfH3KFkVGlixr1/9xiKOPR7YKEqGeUH
+zQVqo4hWZ6gWxKkZMRE6UxKUx9D8/rXHIXeJCNmg0b7JyfGkNOZVY99Hiej
6DGvb990x5BkiBHPF5Nk9Pq8xbP2C2Moyeh9vpBWMtpC5sm9ZjKGKjek6svL
JaNl0y0cxuZj6OFiSiuvQDIKTdfUVrozhoZ6lPhtGZNRx/Une1PtxxAvrTsh
fygJXV3oQO+cx9C+5+rZLVVJyMvu54Sy5xg6HN90rz0lCd17UuwW4z+GdI4d
W38hIAklmZMPOr8dQ/X8AgUxDknI5cC1SI6YMbS365Brr3ESSvi+R5A5aQyx
Jlhu7j+WhLxVc53r08aQiXDtdmO5JLTWbHmQJnUMqfCkU+v5k9CwnXnxztIx
ZBTwMZONIQnpWwQH0WrHkJqgq+SF8o/o5ezdK1JtYyheTHlZ9OuPiN3A9gBT
L7HdyVX2xh/Rtg+KFU6jYygm/pG8/I6PyK9zww3bT2PI5WfsxnsLiYgWnLCg
+mMMGX5z0squTEQeh5hVkhjHEd2gYKLTPxHFVD9092YbR9pnR/a4mSQiI7VM
V0GeceTmRo1ZvzMRmRG/9vAJjKN5mS3ndi8moJ13xaNHNo2jgcD6z1rVCShg
//ezxpLjyCt0t6NGYAI6MTUufHLXOBJhpD6oupaAIp5EevWrjKPvO/atk9uV
gFKj2L+ePDiOWkef9fgtxCP+Dz6WUsfGkaCY5L7nlfFIIKDnddJp4us17/Hq
+ccjs2ta9ZHnx1FtJMsaytV4ZFdkxmh1ZRwxsAkbrd4dj7auPN4+dIN4/MyU
n5oM8UhM7mR5xW3ieL9bjXHXfED5B9YZ6z8cR8fDNtVmBn5AQr1uM1SnceTi
f0T98tUPqPiymK+f2zgK09+y10f+A+Iqd+xd+3oc8Z+59ztqMQ7F8C6qM4eM
o6T1AU0Hq+MQ/fCBM8FR42iG1VesKCAOtayQ012VOI4kXuTHHzSOQxs+qN8a
pxDP52kDm2NycYhBQWiHTe44Uks6+kLxdyySe8fHerN4HDkZF1jGV8YSv7fl
NOypHkdnfsamCQXHotQn245SmonzP+66weZaLHp9JK0ppJv4+rFdT3UUYtHa
b2yrZIfH0cP7Dil8jLHozC723W+mx1H6o9cOLZUxiK4tbXt7bhxxrdF7tDE4
BnGcW3Pp2yJxfNf5+LSuxaDnSNBwZMUEGthXdptJIQZRU+tPp6yeQEmJ9f7k
5THozVqtT1v4J9DeNxZiJ+reo/yz41GsIhNIdtEs9kbYe/TC4QTza4kJ5Jb7
BVnfeI9CXevueclOoMiT4ld+K79H1mJMfVeUJlBht96PZ2zv0XDUjy90tQnk
spJk/q0xGsWy8QhVHZlABiTRyPF30WiV7vS00akJlK5AvlxuHo1kdtyn1P43
gUQo62sjVaJRyLi4T8LlCRQckLydiT0aJXgG8MubTSDLlJSBY01RiJ1POnWb
9QSafawtwh8ZhcSlbh2euzeBvp/1Vey5HYX6t952NH8ygei3u257oyg0yRJU
d8aVOF4bTbNizigUUPW8csBnAklU8W4fbotEjJtFM48HEce7o56VKToSpet3
525+N4G8+GdqwmwjEdf9S7ciP0ygVkXyLqn9kYjyYJmcL2kCNfror1PkikS/
jM0itmdPICV3JiTb8Q4tdjowvy2cQDNXz0qLvX+HTimmPXKonEBhvmWVAXfe
oUP3SGFsTcTxuLo5/Nr/DjmF1LUv65pA8j4zD7q53qGn2iErGgcmkJ3NglkW
PQKJjm/v1pokXp/fqxWex0eg1ab0CqWvEyjb69ST+gcRKKTy3JXKBeL2FENt
Do0INJr3cFKRZRI5XRk+cWBNBHr6usCDh3MSSYyNLH7tC0c5OjVtfnyTaOD8
OsY3ieFI/fP8Hldh4nbnk1rZj8KRm0irl674JFJ7K/Cz5UQ4uq1g51kuM4lM
zwxnD6wPRzEyKlGJCpPoUKfGcovRMPSIM994L5pEvF7DrOPkMMT96CtfhMYk
mtlz/b3h4zD0peoY/c7JSRTvU85w+lQYsmW5dvrruUkUszhCVxQKQ+qbIrv6
LhGPr/JTYlfbW0TZHM1935T4epXdQ+0Wb9EAWVdp1HISaXsihTusb9Flia13
Suwm0RG+VH/WmFBk/zTnwsnHkyjg2YWhJygUjVJtDQ6/IL7fdo+7X7pCEI97
x4m13pNIL7Bg4Yx9COpUYxl1D5xEIgPnFt7yhaDZZp0g23Di/s37U3sowSj+
jPEcS9wkojJKyLCfCEabL28+bJkyiVqXl/OIDwWh4ZPM8UcyJxGX1KaNu52D
0HHxuKxyGnG87VOPZIWD0GK3VV9W+STyanypKJzzBlmKD/9yqp9EDE94C39d
eIOe6G7Km2ufRElaFKmSb4Go1+RRYFvfJPre+9H0qR+xL4UKXR2fROnBdwtk
ZALRjj296Ze+EOd3OlC8vDIA7YmqO7zrF3H/SErumVsBaOSbs30i0xTS5nFa
qFkegPokL1YFrpxC313nc5Wj/NGjwz+LZHinUJI4l9nrvf6oZeZgcpDgFOJS
mKfSm/yQ/aOPpLtiU8hU1GnV+jt+qPhTz6UFaeL+nfV1hzj90PkjuzZ/lp9C
M5ZxVIOE1+jj9l1tuXuJr98uW2Sk9RpF/vymtFt9CpVyfC69MOyLhmK7Pgqc
mCI+T0nbHHzui8rUXtTG6k4Rz2fWxY0bfZGZSV8/10Xi9sDxxtH0V+g/8wuc
w1enkFeKtGnIf6/Q6IWQPhPzKWTIYl9y5LMPKt6xWKV7Zwo5rk243+ntgw6N
brkyZT+FRO4jlevbfJDjzp9jF58T5595fbif5k38eznzYp8ncf9P1RfUr3ij
3eYf6kv8pxDrUOCt8F9eKMHIZRf1LXG8Jcce9b/xQgODPM+83hPHoz86zL3X
C2VpGz1mT5pC9DxSp12cJ6KHNPh+SSOOTzB/3G/MA0XXs+k4U4nH43if8FHA
A0n6TTJ+KiXOzzN7dYSWO5rf86W0vJZ4ftzLrup7uSGLshxlrTbi+4msesJF
e4l2KMflq/VOIct2xPSS8SVKVDy0d+Uo8f3cPVg6D7miKqF3hg6fiNtVLaq3
271AKkObg41+EN9/zR3m/Rku6Ijf9cfTjNNIlnfG5tzYc/ROou7RONs0YiiS
K9y+7TnKOTp0M497GolUhBu13XBGd3Woy1UFppGhaIzKy9BnyEE1m7JNlNih
cz9+dDshCa5Hq6mS00it9+J1q9VOyNNq/LyM3DRydKnnyjv4FB2iPMhbuWca
hem89i9+9gQF0msrfQ4Sj6/F2dmW9hjtndL45HJsGlGP/b4dNeeIQlxvsp47
PY0sGw9IH9rjiN5yni2rPk883r2dCv1d9mja5nI45Qrx/deytcUYPkI9tJ2b
D98kvv8QucKr4AHyePvRP9GGOJ9i6yoRmfvI9eLJzc4Pia/XyfNeS7ZDW5eT
9VY8I4630oW8S+Au4vFQiZpzm0b0I6teJAfZopDfz4K8XxP3n1gTdmHhNhpe
sHdiCiWOL8nh0kcTa2TfE+g0EEV8f8U3lQbjlig15p6MRSKxsxjXPwgzR3vP
PJg2TSXuL/61djLsBnL0kHynkksc7y+xV2+TTNHVpFCG1GLi/k8NygocryJ/
srxtWPX0n/ebq/tzI2QW5vlKvoW4va1oJDrkIpoXCIgM6yFunzdYTNPUQx13
aZUPhomtPHxy3lgHnc9ODmWYIe5/WmFZBMMRtK2f9nx2jtjWnoxym5X+9/XQ
qNxFP1Q9NNdwBpMakVLpCxc2tno0ICmvzlbYiLImgtfc4KtHkk17VD0bGxGt
lYnBkrMeXc0IPvjzF/H1tax3akQlkOHxbMkPHxsRW9tcyXnmejSU/tOtIK8R
+R5lWB2xrh4tt7b64V3biOgqn8UucNUjjeqPV+d+EF+vVJauJrALZR8x++SW
1oikRSYYcjnqUV/wrQWt0kZ0OEQuQZ+3Hj2NfLFpYYG4P71JMEyUH2lWcWWk
JDQitRubTVcsq0cji11JYTmNSEFSLmrV2npkreZ27lV1IxLuk8w7zV2P0vUy
vn39Tny9WRYpVXg3iirLdfClNKIf0e0TRivrUX+/9ibp4kaUs9Wiy4j4+lmZ
Vym/5on7t3ZZsAmIokGrddeH8hsRd3rOydvE+fAIOHr9/k3cbkhRdxdlRbkc
exxT4xuRnrxnSxdDPTJ9V3PAM7sR/cezLIW2ph7Fvg9k8a1qRI87FDlriOOZ
EdqHbP8cj7AG12yYAhJgHz0cQG5Ei8tamBXY65Hx8wMkgaJGtCO1ZG6IOB7p
2XW/7v85HjG9bjPhLchkLduvRmoj6nZgs5wjjkezh7nt0Z/j0S5QmFnPg64Z
TAin5DaiLU3m688Rr59x9ZaWOVoj6hyYkp0mdvuZXxoOf15/ke1O7qLf933f
XntFiTj+/DpGxaPE8UvYlr5kIY6faWXqiBBx/IfOi1zkJY4/wVUldRVPPXJz
dOyX/3P8lqfPrjFSRGck7SUFiOO33qWa8ZZ4/4j9t2fem3j/tGc+Wb6NeLzS
s/pvVf4cvwRbUXCYOGLRth9ZQRy/aX8EfZY4/qH9Go9U/+f5dL6kIbwWScgM
XttGHP/Pn5I1ycT5i4UJi1gQx/8oWVxtJ3H/O2mqE/v+HH/SZYuR9ctQ9EGu
lAvE61P5i3SJQtwe7fqlSYV4/xWKsDrNE4+/73P6u7w/96fumwsTHdnHl/tG
98eHRhSo+H7m92IdYu0+JEvLakTsXBu9Kojz46H0v2isJM5/Rt9VitjtyeEU
3j/na3Ns4zuaIrLKPCLYQfx9id38POQMcb7MtLSwE8T5zkw+XaVJPB6fywMr
gT/nK4iYUy9v/T/nK3/b9KTQn/O1DH55O4wPsfpfXjVIvH/rtoorXCLOl5kt
qFCSON+zJ4Y0dIj7F45czBX+c/xqZrYqwsuRc7zb2fXE+fo31V9rJm53/mJx
/xvxfLErJJXHEo/vtrnd9u3/nG/U7qn1n/cdtn/21ot4/BW/ztnx8xPvP6p/
Xc+f2x2v6NWJtu5781qUfpC4XdAQsVu7f0CXe/+7/ozYdwu0+oWI+/+/x4/v
72TEeY+VuB330XL/86cfmTo7pMnxGMJG9xaoo8GmsGs6Ze6cP2YJW9Mg2miP
vA1swXjvnTNWdrBTRM29Za89XPp6+Z7RCD1H2OMrbijE3X4C+7q5xbG7Zk6w
eXIS6hJfOsPe+NZYJN7FBXatrINA9ANX2IlxDc/YA91gT6WFZcj7eMBOaD79
cUDfC/bubS/OJVzzhm1e9LNfz8gHdo4uW6yy9aulveOMzoKFL+yGhT3y3568
hp39runGpJcf7LOvPjwvcfOHzXJXuLM5JAD2tcgq3rLgQNhBsTLvMvzewB6I
kDbriQqC3T1osnYkInjp/AT3/dhCCYFdJ1Wyy4gWCvuqk5v245y3sJ+b3m0Y
MwmDTSYVW7IMLe2KsSmlcKNw2JNBV0OaR5f2sNXP2wvXImBP5HcN5c4s7XKF
ngory3ewvf0zOt5NLu0r1n3PLYnPUXhzWG+Llpld2rTxXMPnj6JgXz61/fAl
5mjYrR0ZIRJPlrY+3dfbjf09bAqbx1zvi6X9Q9jQJZUlBvaRREfKFo+lbWmU
d8Z5VSzsCK/jXo9fL+3cuJRvvzbELb2fRxVqrgUu7eQItkPmmz7AfuH4U9Ik
bGnfbFVO/L4tHraSoI4Be/LS7nJyecixIwG22zUO5Q9pS5vXIumaimIi7GdG
0vlHyEubsfZb6qc9H5feb0Y9wm6ZS/u84ktv+qYk2I5ya2JVri5t7gNx9zgi
l/Z7d9OA7SNLO258t2Xx1mTY4XkWXcImSzu0tjagMHZpr5hV4+gfWdq2Z1pr
tLanwNYusT8md2tpb0zyNmj5sLRnmyqySqeX9m7OtY27dpBgP3j6TGXs9tJO
NTdSuJy2tC/c1BrX/ra02d9fnnJXIcPePPs07uD9pb0zjWc+PX1pH0orDXow
v7QLy9xnU/dQYB9dfz8IOS7tgu76lucFSzs2VaXqyLJU2L4VZVznDi/tic/X
OLqfLW0lL+u3YoVL29Us0iF9RdrS+/XcIH/R4aWN/Qq8sV+BN/Yr4Pv99Svw
xn4F3tivwBv7FXC+f/0KvLFfgTf2K/DGfgXe2K/AG/sVeGO/Am/sV+CN/Qq8
sV+BN/Yr8MZ+BTz+X78Cb+xX4I39CryxX4E39ivwxn4F3tivwBv7FXhjvwJv
7Ffgjf0KvLFfgTf2K/DGfgXe2K/AG/sVeGO/Am/sV+CN/Qq8sV8B3/+vX4E3
9ivwxn4F3tivgOP961fgjf0KvLFfgTf2K/DGfgXe2K/AG/sVcH5//Qq8sV+B
N/Yr8MZ+Bd7Yr8Ab+xV4Y78Cb+xX4I39CryxX4E39ivwxn4FvN5//Qq8sV+B
N/Yr8MZ+Bd7Yr8Ab+xV4Y78Cb+xX4I39CryxX4E39ivwxn4FvL5//Qp4ff/6
FfD8/vUr8MZ+Bd7Yr8Ab+xV4Y78Czv+vX4E39ivwxn4F3tivwBv7FXhjvwJv
7Ffgjf0KeL3/+hV4Y78Cb+xXwOvz16/AG/sVeGO/Am/sV+CN/Qq8sV+BN/Yr
8MZ+Bd7Yr8Ab+xV4Y78Cb+xX4I39Cni8v34F3tivwBv7FXhjvwJv7Ffgjf0K
vLFfgTf2K/DGfgXe2K+A5/OvX4E39ivwxn4F3tivwBv7FfD8//Ur8MZ+Bd7Y
r8Ab+xV4Y78Cb+xX4I39CryxX4E39ivwxn4F3tivgMf/61fgjf0KvLFfAfuv
X4E39ivwxn4F3tivwBv7FXhjvwJv7Ffgjf0KvLFfAc/3X78Cb+xX4I39Cnj+
/voVeGO/Ao7/r1+BN/Yr8MZ+Bd7Yr8Ab+xV4Y78Cnq+/fgXe2K/AG/sVeGO/
Am/sV+CN/Qq8sV8B5/vXr8Ab+xXw9X/9CryxX4E39ivg9fvrV+CN/Qq8sV+B
N/Yr4Pv99Svwxn4F3tivwBv7FXhjvwJv7FfA/f/6FXhjvwJv7Ffgjf0KvLFf
gTf2K/DGfgXe2K/AG/sVeGO/Am/sV+CN/Qq8sV8Br/9fvwJv7Ffgjf0KvLFf
Acf316/AG/sVeGO/Am/sV8D+61fA6/PXr8Ab+xV4Y78Cb+xX4I39Cni9/voV
eGO/Am/sV+CN/Qq8sV+BN/Yr8MZ+Bd7Yr8Ab+xXw+v/1K/DGfgXe2K/AG/sV
eGO/Am/sV+CN/Qq8sV+BN/Yr8MZ+Bd7Yr8Ab+xV4Y78Cb+xX4I39CryxX4E3
9ivwxn4F3tivwBv7FXhjvwJv7Ffgjf0KeL3++hV4Y78Cb+xX4I39CryxX4E3
9ivwxn4F3tivwBv7FXhjvwJv7Ffgjf0KvLFfgTf2K/DGfgXe2K/AG/sVeGO/
Am/sV8Dz89evwBv7FXhjvwJv7FfA+f31K/DGfgXsv34F3tivwBv7FXhjvwJv
7Ffgjf0KvLFfAef316/AG/sVeGO/Am/sV+CN/Qq8sV+BN/Yr4PX761fgjf0K
vLFfgTf2K/DGfgXe2K/AG/sVeGO/Am/sV8Dr99evwBv7FXhjvwJv7Ffgjf0K
vLFfgTf2K/DGfgXe2K/AG/sVeGO/Am/sV+CN/Qq8sV8Bx/fXr8Ab+xV4Y78C
b+xX4I39Cni+//oVcH5//Qq8sV+BN/Yr4Hj/+hV4Y78Cb+xXWK9b92NkVz/4
Fbyax0INJfvBrzB9c0H6umg/+BUL52klgQL94Fd83m2UIcLTD35FwHb6KyX2
fvAr3qoGFkYz9oNfMZwbuUz1Rx/4FX0XPLYZf+oDv2LPWlJ070gf+BUaY5RV
M/S+Jb9CdqWjeFsf+BUHPIOOkmr7wK8IX8k+X1vaB36FYRiJWZ3aB35Frc6e
b0fT+8CveHpn7dc7SX3gV7xOkdT8+b4P/Ar9VcIunGF94Fc8sj8ueM+/D/yK
vstVOSs9+8Cv+GkkfWTH8z7wKywfFkvE2veBX/GGtO8z6U4f+BXMBmxlQ+Z9
4FdUC67+ZmHSB37FsV+fV7pe7AO/Yutnbrufun3gVxzSf/rJ50Qf+BW89PrT
2ep94FcctL+waq9qH/gVYirFCcd394FfYcJpFkWS7gO/YuS0YdwBsT7wKwTT
5AOMBPvAr0jadaizdU0f+BXfKnay0Vf2gV9h32x1cDVzH/gVJj8mGv50sNiv
WFQ+fOLDl17wK777tAvyj/eCX7HrQv6P+L5e8CtE1J3z6tt7wa+4qe7coVXf
C36F2RVj+vnyXvAr4j77fvai9YJfofmG4bxgZi/4FcGXNOOVUnrBrziuWnP6
Q2wv+BVJSrsGEsN7wa/QjRp+3B7YC36FvmSrrYF3L/gVXFXROhYvesGvEHdJ
etbq2At+hT15VfF1u17wK1x+H55+adm75FcYZpszm/aCX8HZu7qFw7AX/Iob
9ZTjSK8X/AqJTj/+kpO94Ff4MZ2t6tHoBb/i6kHtVi3UC36F7WzwzKBCL/gV
igUlnzh29IJfoRe3/aibeC/4FdIfrV4ECfeCX3FgC2tLPV8v+BVppLb7hpy9
4Fd0X3qxwoGlF/wKYzGbsS8LdPArQllUU398pYNfwa+v57l1ig5+xeeixNwP
g3TwK+xP9jdTu+jgV5h90lGXbqKDX+HHvDY/r5IOfsWd3ZQtA4V08CvI9l70
i9l08CuiB486mZHp4Fe05ujuDo2ng19hlhi8VyKSDn5FYna+9MFgOvgVOv2b
bpNf0cGvUHzQWHziJR38imrZq0x2T+ngVxT/lvX7fp8OfoXFWDs3+206+BV2
U3n9VmZ08CtoV+ZojEZ08Ctyv616KapPB79CIOJCbOApOvgVEjfcksKP0sGv
sIviKKrbTwe/QuJ72Q49ZTr4FS9MjZ9a7KSDX6H5SXl7lwQd/Irj45cHrEXo
4FcsYzJ1CuSng1/BJxd7n4+LDn5Fp2Ppf2KsdPArBpDKYX0GOvgVfjLV3FXE
/bBfUc4/YLqC3gN+Rbac5c0p4nGwX8Hrmr5/LrcH/IopWtRO7Y894Fc4S7NV
64b2gF/hVCex95FHD/gVau9zz5561AN+hf2lHy9tiecJ+xWip2d8sojnEfsV
TncvHE4knmfsVxxvca6gEa8D9iv81uve2CrdA35FqFtgmtKGHvArVu1503Rj
ZQ/4FUoC3GHHfnaDXzHSIf3sAfE+wX7FfCvz3qq2bvArqllOv60o7Qa/gsXy
QuN4ejf4FfNs3ZT0993gV9xxZkpp8usGv+LMvkEHXuJ9jv2KGXHVn4u23eBX
fNY8dZiD+HuC/Yo7p9gTzM52g1+R6aJMtVHvBr/C6JdYVNjubvArSkOdFe6J
dYNfkSLm3he+phv8Coahk4YTTN3gV3C2urj2f+4Cv8Jxub3zfF8X+BV31vKH
XG3oAr9C8qyE4QPi5wz2Kw7Uz86mED+HsF8h4KCo4E/8nMJ+hQ3nRp8Kry7w
K3a10fI2ET/nsF+R1NgZKEb8HMR+hc9KkvpR4uck9ivkby+GCBA/R7FfoZcz
w7V3Xxf4FfQDoboOMl3gV0j8yD9sIdQFfkXjWDjbY44u8CuY88SH+xY6wa/4
XLDJ6tNEJ/gVh5jbKjcR/05gv+KsLUvT74pO8CvGSlvnpLI6wa8YOHdt4v6H
TvArgtfddL/zphP8inSe7Qy+rp3gV+jN+LgzPugEvyL1t3nJBrNO8CvuH1nR
cE6/E/yKedral2pHO8Gv6LOj8x5T7gS/4ji3dkYU8e8w9its2nezJxD/TmO/
YllPi/Sff8exX6HFO/PrA/HvPPYrBKUTBuuGOsCv0HYQD1/f0gF+xQEmPjbO
4g7wK97Q8g+IpXaAX2FjzOPvSvwegv2KVYpt/iHE7ynYr2BXNzCrJ36PwX5F
8VPdURLxew72K1iivjwZvNIBfkUco9aUEvF7EvYrVnkKsygf7AC/ovHch2l9
4vcs7Ffon0p8to34PQz7Fcbbzyoc4e4Av6L+UGa6C2MH+BW/3XyHbWfawa/w
4pIacaK3g18ReceEaaC2HfwKOw7+imni90jsVyT1PDMWIn7PxH5FdN/1uLnQ
dvArREo/s4t6tINf8XtEUdXcvh38imCVLxuu3WoHvyK0xKzy8YV28CtEFZ/7
TxC/J2O/wqRl/Wpm1XbwKzhJpnqq29vBr7DJ2661WbAd/Aq1FR/XSq1qB7/C
Y2fT3BPi93jsVwS7WTk/J37Px34F5+byoQTicwD2K/aNBXxxJD4nYL/i86tV
GyIz2sCvYL+3l3c0tg38ij6Pvoz2gDbwK4Tph3ZOubSBX9G95njBKeJzDPYr
DOzKGP98zsF+xT5+Jh5f4nMQ9ivoIynV1sTnJOxXMAeviA5XaAO/wsOV/+Rn
8TbwK5pj30ZOE5/DsF/xhLm/gpP4nIb9ipT9FRz231rBrwj7uG0+kPich/2K
Wb1D2S3E50DsV7DINUnQiM+J2K94eET0WjW5FfyKO2q8VMmoVvArZK4/LJLz
bQW/4nhVWPBFp1bwKySM9ogo3G4Fv8K57X7uBeJzLvYrNN3uyLwnPgdjv6LS
YkQzhPicjP2KFA8+ZQrxORr7FYJeo/uFRFvBrzhE2zW3k7sV/Ir6HUr2poyt
S35FNSn52EwL+BUTWo2L9sTnfOxXiKxM3thY0wJ+Bc93pomm3BbwK8xE1rj+
SGwBv8LxXkBjWUgL+BX8FJrymFsL+BV80rGW0o9awK+ob1h+ZsPNFvArZlOF
2aQNWsCvCHjY2ep2vAX8ip/WXLpv9rSAX0GLZHhXJtUCfsWRFddCogRawK/Q
OW6dUsfWAn4FtVI5cOPPZvArJh7dlRYYbQa/wt7MyluhrRn8Ch9lLu53Zc3g
V5gob1HNTm8GvyLU5pvKXEwz+BW+dNXBbv9m8Ctmnu+/PPK8GfyKau6xuf12
zeBX3Kxk3XPkWjP4Fea0/pOW55rBr5AZledWP9wMfoX1Z8nJ67ubwa8QUOx6
k7SlGfyKJ/HLv77jbQa/QuvCmEgGczP4FcEzt68Jf20CvyKOfFtfdqAJ/ApB
8o6Nxo1N4FdoDVz2OlTQBH7FsjklQduUJvArBNQr75VENIFf8bmg6WmxdxP4
FTL2QZeGHzeBXyF5vWWYbNkEfkWMQrpr/aUm8Ctcke4it3YT+BXS90xFfu9r
Ar9i15TimlU7msCvyFaPFzHb2AR+BXO1X7sNZxP4FUneqibhvxvBrxB01g+9
P9kIfgX7BcFP7zobwa+4aPFm7XRlI/gVlikeQ0NZjeBXDMmiFwzxjeBX0L19
D5sFN4JfEbDZMMnxZSP4Fakzw+PpDxrBr/CZGmwIMWsEv6J+a5h7pH4j+BV+
Bxcv/9JsBL+C36ux77dyI/gVDPwmu8UkG8GviK69Jf+NvxH8iuobAlr8rI3g
VxgceKps8L0B/IqYo0Z1x4cbwK/Qd1tQudTSAH6FR7JqXn5JA/gVjitmp2tT
G8CvaA0w+cz4vgH8iin9k+E9rxvAr3Be7DTjeNaw5Ff0iLNcsG0Av0JtZujE
f8YN4FcY7b1y7e6ZBvArWG44BQ0eagC/wrR8w0MG+QbwK2SvWsioijWAX5Eq
q+wuvqYB/IoIxbycnUwN4FdwbRpjdf9SD37F3j0vGV731YNfUe01UpZbXw9+
hfC6bPQ6vx78is8O8rVZSfXgV0iKXd/FHF4PfoXIjzX7f3jWg1/xkO3BJi7H
evAr9OedBe9a1oNf8X0jW6HrpXrwK37aa6hST9aDX5HJOW8Usa8e/Irfjrrv
GrfXg18RLXODIiFcD34FJ8fc7W0c9eBXtIsj5uMLdeBXGFstqG2YqAO/wjrU
MEClow78igEWx/wHFXXgV/CFrfW/nlkHfkW8zbV99+LqwK8olLrI0PamDvyK
4DUV5oMv6sCvaFWYTVxzvw78ikbXV0FTpnXgV+jkt0Ss16sDv0JervWByZE6
8Cuam7QYDRXrwK/oJD3We7C1DvwKE5v/yofW1YFfkXj1/chvljrwK/R9kluV
5mrBryie3mm7cagW/Ao/F/P+rc214FeMMWnfdCyuBb9i/uP78GeUWvArrP2z
YuKjasGviPmobuDoWwt+hWGcjWTk01rwK+zpl8pHb9eCX6Gvkc/XaVQLfsWb
0W75GZ1a8CsumoffOnOwFvwK+uZ2nau7asGvKOWtYQsQrQW/wlxB5dZd7lrw
K/xUNMejGWrBrzgyK31nprcG/Ap6Y7L5RF4N+BWHpD+yS4fVgF8hNhiwWPio
BvwK1iuV236frwG/Iv2c3dz9vTXgVwwkcAmfEqgBv6Lz/qYRs5/V4Fe0rno4
LNZRDX6FNkMBUsqoBr/C1+zJHs/AavArzijIeKG71eBXCJZsFvDSrQa/Ir7a
W0NMoRr8inTFiSpu3mrwK7zW5c0dmK0Cv+JmdsdZ3qYq8CtKaQOciFQFfsUE
MjFLeFUFfoWbcKOwrVUV+BXytJesXSerwK+I7Mx67SJbBX6Fr17rA3fOKvAr
jh+7tbx5qhL8Cse3U8N3KyvBr8hOz1jMiKsEv4J6ZCETvawEv0JNZXuN8PVK
8CvcIpqc9x+tBL+is6bkNrNkJfgV8RejM0RYK8GvOGS8EOE4UgF+hV6F2qBy
cQX4FTZzVQavIivAr9B703BX9lkF+BXZoUXj4lcqwK8YWS/LdPlgBfgVgvoD
J/eIVYBfUfnL6av5sgrwKw7xhu4b6isHv2Kvxzt6KrUc/Ip5+03iFWHl4FcU
yo+GOTwuB7+C9XiIjfulcvAreNvLxrtROfgVYWV9WS+EysGvkLVXz2/8VQZ+
hVusiNmVzjLwK4wVRm4cyywDv4JZRYL77psy8Cvil6WMH3hQBn5FrbTERtP/
ysCvoFbxfatVLgO/Qrr205ZX68rArwj253v59Wsp+BWtTaRXQc2l4Fd42ap+
fUMuBb+Cyw397PItBb+Ci1lG7751KfgVvPtNxlO1S8GvGJjlE1XcWQp+hSw7
OZlrdSn4FYf8yga2T5eAX2E4LHFivKYE/IrvgTacyxJLwK8wKFC6beBRAn7F
Xq1RWa6bJeBXiIT2bzbWLAG/otb4bOYvyRLwK+bdKLETrCXgV8xKue/dNFoM
fsWMZyLzt7Ji8CtMdbO3iMUUg18R731g7LVLMfgVN3dQVlw2KQa/4vvBsFKL
w8XgV7gINeUKby0Gv8JX7xvH1uXF4FfcZPdiuD1YBH4FVYjvOH9BEfgVgt8G
Ky+EF4FfoaYu82nocRH4FfSvRuZll4rArzguxOU5jYrAr8hmWzFIESkCvyL+
3Nirpt+F4FcYCx4eUuopBL8i4ICH99fsQvArGreLWOsEFYJf0eop+e3zg0Lw
KwxOb2qY+K8Q/IoYd6/TkiqF4Fd8dzvKxrqhEPyK0smpdehHAfgVhkWryjPa
CsCvsPvN1+SeVgB+hV5i4NMo/wLwK/ZuNrl2wa4A/IqwH8KR5mcLwK+oPKzt
VKBQAH6F3ddbOVa8BeBXSFxvkqJ+poFfEXaaoqrTQAO/IuDt4xjVZBr4FXpG
xak3vWngV4iMnfm5x5oGfoVxQ42fsTYN/ApLuYLmWlka+BXzsxEWfpw08Cvc
HlSqzk/kg18xYmf+MaoqH/wKasv8vZgP+eBXGCYwjUy9zAe/wnHgW6LH9Xzw
KyLpch+qNfLBr/A9PaqpI5EPfgWDxMuDO1jywa+Qvx3Vc3KICn6F5VO2ZK4S
KvgVEl//65CMooJfEd8lGuvyjAp+RfzW1hp0hQp+RZJCi5T/fir4FY7ZWlK7
RKngV1S+S3kqzkAFv6KUSXgxm5oHfgWDptnlW0/ywK+QPe1pW7svD/yK70ej
ajMXc8GvSGfy7TqXlQt+BdeH2zsfPsgFv8Kyc2iavjcX/IrS2l2G37/ngF+R
nmKxzj8jB/yKsHPPHEdscsCv8HKWOXN/Zw74FfzvSs1ffc4GvyLgyZ49lxKz
wa9IOvlWK8U8G/yK2mi/SnXZbPArRqgm8y8nssCvCCjdevu/hCzwK9Re5Qe1
mWaBX/F9eErmzZYs8CvUJDnY+oYywa9w3MH8ujMiE/wKPdGJaxevZIJfIdEa
P+EjnAl+BSs/Y+eKjgzwK+zUD/MwB2eAX0Hfbfwz5VwG+BX0Nbe3ja7LAL9i
5MHagktt6eBXzER7cb54nQ5+hUvefJjy2XTwK/iD9g8Gc6eDX5HOIOCrVp0G
fsXI6f4XNzzTwK/gN3u28+ixNPArWm/xiySuTAO/IuzXvnunq1KX/Irj+5w+
vEgFv4LqKtPsqpkKfgW/21ybIEsq+BV2684cmaZRwK8w9QpfOOJEAb9Cr7LE
WFeNAn5F69dunlEGCvgVen3V1juyyeBX0PV0VFPtyOBXfM8u1ipUJoNfwTWw
hufZVxL4FenfTwlWUUjgV1j6b/bWvUta8it+VKV5yZHArzA8cn3L6dkU8CvC
9LsOlX5MAb9i5NtA9aObKeBXlDp2vc3cngJ+RVhVomjcaDL4FaysVhMiccng
VzhWFou03kgGv2Lm9FeWAxLJS35FKa+83GgS+BXfGTjWtEQmgV/hIv5NadnV
JPArJJqty26JJ4Ff4ejttY6/6CP4FfRTQpJXDn8Ev0I24HzYmpxE8Cu8PlPH
Dykkgl8hIsFa5JSeAH5FWD/DMknZBPArtO93VHYlxS/5FVu6bvLIx4NfQdX1
soyP/wB+RdjlLct0ZT6AX2H55cacUVQc+BWGgW35n4TjwK+wFNgm4BkeC36F
5SbJZu/1seBXhDFxiLx7EwN+BfVGeNV67hjwKxhGDLS5Xd+DX2GIfhquW/Ue
/IokwaNNT55Gg18h23SvZZ4pGvwKanhd4pxzFPgV2rPto+cWI8GvYBAtTil2
jAS/IqzJqOfN3DvwKwxDxHunLd+BX6GmVml5+ksE+BVc1zcbC96IAL+C65bB
4JfxcPArRJ5l7zluEQ5+hezm6q9sI2HgVxgG56s2Xw8Dv4JBsap+Ne0t+BVh
4+3qXrRQ8CsMSxWu8JSGgF8hkvxV41J6MPgVItp2R8oyg8CvYPh1gev3+zfg
V4hUez+RfxMIfoXjuRdcLqEB4FfQJ/qvRrv7g1/hqLSspdfDD/wKw3jzz8Kv
X4NfISK9r0nc2Rf8ChGjuoZjL16BXyESWRK4564P+BVqnKvYt5t5g19BleH1
22PhteRXpP6u35brAX6F4wODZD6aG/gVVD1H4cAgV/Ar1JzV6MIOLuBXOIq4
tHU7O4Nf4Vj/+rK8sRP4FQyfJDcVXn0CfgWDocHuc1aO4Fc4Vr1PWox8uORX
kKOuFn20W/IrKnYopV61Ab+C4clnUsIOS/ArGLa4qMo5mS75FZrPg2m/Ly35
FYnK92f4tP+3X0FfKcO9732mqeT5g3rw/7MujpcbnPRZ+v9a90NDTFMj2lCB
bHJFpEz/kl9xU8D9E58acrDTYDb0WLp/RZriHuvQNiQgZtxXLNu/5FUMFKtd
Fz2CVC9qUfb5Ld0ffIqRjpQvfLLIptBJTDu4DRWH5Ey27Oxf8idEQgS2SBxH
1ZGr2DR8l74evAlDF5Mbokoofp3XZYWApdvBm6Bf/D3HJ4JKNaXWo6A2FKxv
dttwV/+SJ6HmsoJJSmvJiwi7qLZVYi+aVbF4qeK/9P3AizBcmWIhKoGMZ5MU
dwUu3Q4+BNX4NcM6LvTZ3f5V6ps2tCJDLTWSeDzwH2oXFqykTy75DtSj25dL
7VvyHMJ6X0pJSCNW57Dj5P91PuA3qHEftRPlRz5Sytut/tfjg9fgaFnAvY4B
Pd8Ro21NPP7ekQ8txcTjg8cQoHRvW8LJJW9BO2+zjTRa8hWolXZsUjJLfoLj
sKi8hOD/eTzwEhiE7r4QZUVTgUf5p4nb2eQ6brMSt4OXwOCyUX7dzL43gX/+
tKGo3pDg1WYUhHfXBr4TacE16PJgrWgHsbXd/c15iK//fx8P3z9M8GuKOLH/
3+vL456Ad7t3sMOHw9ATBI30LD9WZwg9weX164q68m5CT5DT0LWMU8IGegKn
R3WDyQ/uQU+QQtv5qGOHA/QEZVOR0z+UnkBPcLTkik1HoRP0BB9ZdrhqOzyH
noAkw0QdWuYKPUGMnNNcPMkNeoLZxaP0lSc9oSeg1PHktrR7QU/w7vLTPTOb
faAnUA1elat4+hX0BLGmo/eC/X2hJ0jkt83pq3sNPcFH9cEHBl/8oCeQ5guo
k9oWAD3BtGTQffLhQOgJOrSFXSTPv4GeIPnUfJ7S0yDoCT449GbPvAqGnsBH
/klxZFoI9AQ9fuF8kvWh0BNM0gc1NZrfQk/wSm731jN3wqAnsE5fUeL+LQx6
gsy8J7Zx1uHQE9go/HrlPRcOPcEpve2D01YR0BM48xq9rp2NgJ7gzp2qZufb
76AnKJgZvblp5B30BEIqNNlR40joCVp3V+tVtURCT6CpJ0UN1ImCnmDZWTvZ
O2VR0BP0mDDua1GIhp5gc9++5TUfoqEn0OzI/uq47j30BNp2l9YlOryHnmCl
ItNdsen30BN8MSz3pujGQE/QXXtnnXZBDPQEwu48ev9tj4WewNk1cEeXRyz0
BPZ65q3Cc7HQE3S3UXRXnYuDnsD4ztV1FaQ46Am6FdmLFvk+QE8Qe1RNUdn6
A/QEu3unLiU0fICeoKFA/Z7u9njoCa54SXrPP42HnkDZUuViID0eeoISs2P6
ebsToCfo9NJQjPBKgJ7AN1vWy24kAXqCC1TLamnlROgJvjxfa6/vmQg9weV2
Gz/v7kToCSjrU1TXSH2EnuA55cuW6ocfoSeg7Rba3VvyEXoCMR0f3fmVSdAT
3Mi1bnm/Kwl6go19Wa/FzyZBT2CrXSTC+jAJeoJjxe+Z60KToCfg/NWq3V+Q
BD3BVQnGwdjhJOgJLq92N33Emgw9wdS2xi0PpZKhJ0gUYdwUdCwZegKnDh2W
12bJ0BNcSw83DnmZDD3BhufFDKOxydATHImWNZMqT4aeQP9Re+xB4vMC7gki
vnMw0JanQE+wlTtsTkAsBXqC2Pe9Y+MoBXqCWaGzT1P1U6AniL76tF/tbgr0
BMW7yZlXvFOgJ/jznpJNSIGeQCO8xCa6OAV6gq8bVpLEe1KgJ8jxfZun8CMF
egKFpsf5q7lJ0BMEfw5SvyJJgp5gvFFANPsACXqCtd5vhBb0SNATCN3ZofzW
kgQ9gSDZzkbZmQQ9wScDN44fb0jQE1j0Z3sxJpOgJ9BYKXdsYxEJegJmg6pl
1u0k6AlUROnBf/xh3BMwdp61eslIhp4gUcrkodZaMvQELGoC73W2kqEnOEPy
rDVUIUNP8PZTVn7ocTL0BNkRVaXKF8jQE2z/9qO7xJwMPYHY5RKTfHsy9ASP
R+WtVniQoSdYf+FKtGQoGXoC4fVKVg3xZOgJ2tTHjDSIz7u4J8gsjk9hqiBD
TzBivOHjpVYy9ASsedePWw2RoSewv3jt144vZOgJhM6FNp1aJENPkFDrXMC7
igI9QRp3sHTIOgr0BMuYLaiUzRToCaQ1Vrpu30GBniBYUkP2qTIFeoKLx1eU
njlEgZ5AZlyayqVFgZ5geSOzjpIeBXqClMG2exWXKdAToCuLHobE7xO4JyjY
cTH5xG0K9ASshdtajzygQE+g5TJYVPKEAj2Bxfn/1ri5UqAncPV1tLXxpkBP
8I7pbptPAAV6gvznXPo731KgJ0h6emmeLYoCPQF16JYKywcK9AQGnR/HNZIo
0BMwta++JEKhQE9w0Ne8lT2TAj1BwaNsq5O5FOgJOM7GB/rTKNATSIuKNh8q
pkBPELImjeFVGQV6gvzhkOSGSgr0BEw/zj5wr6FAT5CQfKxUqp4CPcEzPtmQ
a40U6An+Y/L3lG2mQE8QbPtJuaqFAj3BMJvwEcY2CvQEu7LYbg0TG/cE0j7m
Kt7tFOgJxryHdg8SG3qC0LJ308TGPUHCx/UjMcTGPcHesqatG4mNewJvnzGG
vcT3xz3Bna5HDza2UqAn4HPwzQ8mjhf3BF9Vsg/WE+eDewLqutZQOnG+uCfg
mftteq+WAj1B8hvfq7NVFOgJqvKETqtUUKAnoOz7Mf+rhAI9wcEH8nNJhRTo
CcrXVvg1USnQE3xkMhelZVOgJ+A9ULSJlE6BnkD8uc6B5WQK9AQzrJ/CjT9S
oCc4Pr7BOSSOAj0BV1xW9Dbi/YV7guruN5sbiPcf7gnkMkItCgMp0BOYK64N
73hFgZ4gr0hUqtGdAj3Bx41JLCueU6AnuBF446aFIwV6gvMJa1euuEeBnkDz
9xW5R1YU6AkOXk7zViL+vuGeoHzd6Ya1RhToCWZI7rpq+hToCZQrdtn9p0OB
nmDtGs2M50cp0BOMbiX95N5PgZ5AVGJne7QiBXqCFzs9YrfKUKAnUK55un/N
Fgr0BFonDJvnBSjQE7gr6ZbpcVOgJ/hPMKT14woK9ARdZ39WfJ8nQ08wmMbF
RvtMhp6gjuKkeHuYDD3B+ppVq+M7ydATOPhLZQzVkaEnkOO94L1QRIaewGrl
3aDYTDL0BHa8u7dKJJKhJ2idaGSKDidDTxD0lRpZ/JoMPQH3IEk00YUMPYFb
usl59JAMPUFhsExDlwUZeoJbIlWLikZk6AnUQ8qSj+iSoSc45NU3vlKDDD3B
TMHcQpsSGXoCqfW+ZjekyNATaOff0okUJENPsOb40Lb3nGToCTYepnoeWSRB
T1C7UZ731zQJeoJfXpVMTr0k6AnKr6bmh9WRoCe4or1e5w2NBD2BC2W4NplE
gp7A9XVajc47EvQEbZ37rnW+IkFPMN2ltXz4CQl6gnOH8k5zWJOgJ4gykVkl
YUSCnqDyra5vhjYJeoJDNUp+6mok6AmsfNmv/9hBgp5gZOaYmoAwCXoCBjPr
uAZdEvQEe1k73w8T5497gqJPPvJuQWToCY6Rq34d3EmBnsDvaB+zO/HzBvcE
Zdpz7leMUqEnIB0d07JeSIWeoD1NL4zmkwY9wVm6V8yzDenQE+TwzkmJJaRD
T7D4vm4gZlcG9AQ3BqeGz5IyoCcw4qdNvNibCT1Boq1U9YXMTOgJGvcvj7mh
lgU9AcsRj4qs/CzoCab9RuX/U8qGnuB56w4lemo29ATvzy+Mr5TKgZ5g46ty
267oHOgJ6o6z6poK50JPYHJa5La0Wy70BI/G5b4fZ8yDnqD/dJT655t50BMM
ZS4/M9KYBz2BlNcauV+bqNATxEsN2zHpUqEnWCYhlXf/JRV6gkcXetdupFKh
J3gi83bYYYYKPQFpYIC6QywfegLF9VbHM0/nQ09Ae1xjk/g4H3oCuwaJhoaU
fOgJDlZMdrDQ86EnWNmZwaTDRYOe4HKGBiMbokFP8Fkvbevv6zToCWZULl6b
9qdBT3C14L8ARRoNeoKmSLZq42ka9ATXn+0fFNxQAD2B8SX09NzBAugJEsy7
lC6YF0BPMBTVmv/rdQH0BHfOiLScyi6AniD9C1e+/mAB9ATLz7ZniK4shJ4g
/dWngy/kCqEnWH8gxeO9fiH0BDcXziXE2hdCT+CvsveKXFQh9AQdn7fRSKWF
0BPcddsRyD1eCD3BLYnqB72ri6AnuEer8ivdWQQ9wXGZ2arVZ4ugJ/C80nDf
4W4R9AQWJ4QSe/yLoCeY/RXY/jKzCHqC2CphU/v2IugJejzOycbPF0FPcP6I
FbVMaOl6mJ5XJ5M1/10P89/1MP9dD/Pf9TD/XQ/z3/Uw/10P89/1MP9dD/Pf
9TD/XQ/z3/Uw/10P89/1MP9dD/Pf9TD/XQ/z3/Uw/10P89/1MP9dD/Pf9TD/
XQ/z3/Uw/10P89/1MP9/fj1MsT0sPwtH29FurTEN3SYK8hPh8Nz6sx3N2rS+
ZWuhoG81Pwci2DuQR8PCC8tWCjKaSTt0VaADnbkprfiojYK2Px9Wi5XsQG1X
BT4ebqegoeGFheV7OlD4wl7pQmJ78Px68OBYB/pUfal7lti+JDM/a4MO9GN/
8MFmYscUxWYm3exAT1czxt4kdmx4zdsVjzqQH7N+TBrx/QM0OtXvunegu84c
d1KJx7+TVhO/GNKBTl7kPmJKHB8pZHcS28cO5JI5tyefOH7TMxYBPUx0JLP2
ISfXVhKSMD/dy76Kjm4PavWkrCWh7ok41wO8dOTlfldU+wMJbVl7TPgZVx+6
OnCCj297MTLosVybyt+HTiRafDi3u/j/XP8zKWt3XvNgO9rr+zWP3khBOtv1
HQa+tqOp56Ulb5spyHU89WgMSwe66qK2exNxvP6HhJLs+ToQ40Lh3f3E+fhc
M2u5Jd6BFu9uiV5PnK9YyzTrGsUOxOqv9yme2PPu7ClyGh3Iu6bo/Z//b/Xu
2uaGfXodqHStps2f/4/l5VJ3o8i0Axkq5X9yIzZ1hvdhiV0Hkg/XmJokvv+L
KC8/hxcdqF3b1OwX8fh+4eESpEDi9tBLt4qJ58uGmrSrLo54vu7tNd9JHO8B
V4FYGiMd/drUruksRULmUgrSPOx0JOfGOTq8noT2Wgre2MhDRzQ6X1miIwm5
ocy1Hpx96KXCvUHrLcWovcY8wpevD43abj7wW6n4/1zv9DJ5n2MIZwcKvqKm
kkUcj3SwTtsx4Q5U263hQiaOtzTaOG5Ahnh+/A1dzf+8H76v/PJ9Xwdaa8c/
+ef9IeI/rl5wsgOdP6fQ+ef947yY/F+0YQeqebiel/bn/Jc9YQu27EDfHLNX
HyG2j45rgcbjDtTXbqH3kPj+HsKFz+eX05F1+f/X3p3/U9V//+OXUDKEylDK
TJkrZIhdZpKopDSpVKaKSqQMmSoUlVBUKqQMmRMyZDrOsJ2DUKdBUg4aRBpo
+Kzzvt2sXrfr+uH7B3yvH9ftsPc+e6/n2ntfV+4P/bJkxRKir9AvebpoL3Hs
pdEeKe0SomaIrXpSoo/g2XN5c4le87/yV7+eYNx89eYZofZE5HEmXO/CkvBv
j8eeESdOv+j2hPO38cfcn/f42IRyWTz9G5zf4o9te+PmsgnbB9IfFWD/jd25
ik7K8I44vVFnGhxfI+l5XkafTZyWi8q6AXXJGgnGbCs2cZxvv+Qw1Pfqwz4r
b4J+t3HR5NZ83nsb2/bB97u7OTANaofUFd53jrGJh711mjOgjugcqok8zSai
nSJXy8L+spNj38WnsAnjCydSxuB4Op0/jpXmsAnvwKGS/XC8Oip+S0t5egkH
H7ppnVYJIRF7hzVPsJew/SjiM022hHi/1IUtIt5LlDTNOWHrU0LUdvpfuCjS
R5Rv6xK/odBMyFA+cCLn9REWzqeSWcbN/8qb1XycvixDmE1sFz13LBmut401
f8JmWTYRG+hx4Aoc34Rk9nizJptY37/GfCscv81IVNCflfD9pekLSKi7N465
31jLJoICTKLGoT63RTQofgds72sCjQ61Xv+83dkH2US5uvM7N6gXTeQVqYWx
iYFdoTevwvZPPJQR+8jXS4Tm7GrqUC4homf3mcwQ6SWKy/RPqc4vIUbDLt0K
F+8jDqwcPPpWt/lf+bfu3xbHxy1mE2ZmIUxd2H70q2ORwkZswj5PY9FDqK2Y
vCmudmzipdOGoVGo00VaSje7sYnuTWMnXkIte8d0TpU3m2h6meAaAjWN3hgj
KtRLFKQdrGRIlRCC0y4dGF3FJg5H7srg/rzX0zfqA85sYsGhjHfc7YVmuZjU
7WYT6i2RC8uhNlv/Z+QP9Oslvdz6ydUlRJyLcm7gnD6CTuN/HAbr7Z/5vDLb
ZOb09z0jgjpObYyBfn359dLy4tFnBDFIfekA19+Yx9Ilbzr05/LwnD7oj1qL
u3UX5rCJQcm7NeJw/l4mONiuVmITeR++Bn6BOslehSWrxyYuBr69lMqd5+rJ
z35ZsAnpGWJOHKgLPubzSLuwiS18aokfoK5xuz/SuZdNJDS4rr8FtcR7210p
AWyiM6d6/Ryofw9LdUTHsIlllkstNWH72uJhTceT2YQBxbJYEPolav65zuw7
bMLuTOOuCDje7NGr45rQr3cTPN4/h/XqYeSemTKzlxhebDMssrCEaLzoPyda
DOpYrf4E9xJi8421bXOhX3sDB1JL5ZoJQ0ut+Mm5fcRCr8/mVSbN/8ojFm+l
xd0UYhP+MnuzImH/G9NeDu5YwCZah8sD4uD45rZZL6jQYBPhuQsUneH4JX1X
V/FCv759yrRp5f772OWBB885sAntKtGt3H5NjFl5Omw7m+CROHOfBfXHzp3n
cw+wiSXBS4b2QN2/tiZHKpRNuK5fsfYubH80xrJzH/RrUXIH76hKCdFVc1X0
LNyv2rfJLM2aC/PW/lAvL/SrQAnf+C/t5n/lIx+/31p0Uo0N35vhoQLb37h1
efNsQzahuvG6Rgl3ft6PybSyZRNzS18f/gx1hvF4w5otbELmqJJ8H9RdKaeJ
Oi824TbN0Caa278nQ7Ykwvyfc8Vp4Jl0CdFzcl3hOMEmVh4+PvQMPres2G/4
xIlN/AqRFuLO44j2SPuSXWxiETt/VTX3+0+raDgF/Wr+mF9RyLCEUJbnGfwB
81XyxdnqKwbN/8pv7vE9X6tgDc8LqeNnuP2TneTct9SVTaR1bg/i9tfEmgIr
Ybi/ePFdHB4waob3WIr+T1O4H+YY5LRz75cBhzYUObKJu78/beGefz33JV7R
sN6r7p2NlIf17/059KyXPZtoyVMW5R5v8ELh0nhYjyL5vrvrJEsI4+gu9U+r
4fPLPaLc83F+YufCH+vZBEu15yD3fI3G2h4Yh/XGOiPntRfm3T/zpNUdatfs
g/VWoCPBGwjr7VjqNdYSWG8NTeP1ZtC/eZHsaVqw3jRvnZ3ohvVm/XHex7mw
3nRP2MQLwvUfGpZlP1RkE0Vf+39y798nz0Qevr6cTUzEqYwkcb+fzObXR2G9
Za08xngHtS6/1ZkLG+F+Q/99+yPU8zd0xrjCetvd05uVBfX4Zda22bDePqvu
s+E+X1QHar8QgPV2fdJBQw+2f9jxh97IZVjPo3NuzoV+fx76vFEO1pvEloNp
CXC8j4vd77f/eUXUqn3V9dEpIYQvVJ/bDOvt3TbdBUmw3nQbwu6vgvW2IZZh
smxrCZEVZfLxiXAfzNfrhrWLmglbXsb2B9z11vRQRndl87/ys6Mc9hgqwnrT
efdDPhj2z7ZaI9UHz5PeLWt3RsHxyWtIFejCettFGR9dw50Xd29si+I+T4ZO
PG7m9rOSUQAfrDcBjcVq3Ostca1D9Ac8T2qaJkzvhHoNI0pZG9bbnU799Z5Q
N3+zzkyA58k0oedRhbD9/A9bDJRgvQm6vBY9pVpChEl++2YH643WnSyiCc+H
PTrb/zTA8+C2n1Hi3H8/9s887xihq5bjqtx/r/40gfvv3VdeubD/Ajy/eU47
IlXI7Z/rtrnV8PwWl9uaMgK1onP8miZ4fpOMM+x8A/XyxLwn5rDeukblVc5C
3dTx1NwZ1puFS9KBXfC8VVeZ7xwI620wseJLD3e+3FlCOMB603eeE8rtX77B
+e2asN7+zN6mVwu10Za5+eaw3oSPZGSLLy8h/Pk/zqiC9eYt5Z6cDc+v/8wb
t97m1JwKzxs/KlXd3sPvL87leOXC84Zrwfbng1DPmuUoRYH7+6qLT+u2Qb+7
F6t2h8B6y/w26s3k/n3A3qVui2G9lchFHeee/+cPotdbw3rT0WG+U5KD89e7
KrEX7o+3992PGeN+/wDPa2thvbW5s+bYwP1PsUGP7gfrbVpBrHsvt78HFZT9
YL1VF6voc+9/Zn4G8eWw3lbEbb95GNb7P/PP5U06O2IsYf/Lyx5xj1ezR/L4
dbj/aByx8Py/7xNzrpKA459hcdbXGua9pWXZfkl4ntCumRvMPV7t/WYqFLje
F8Qi1i+G611c23iNhPlooTHbiLv/LkrW0h1wP85faBPJPf7zMfkOxvD8+dEp
XIX7+z+nPYoYhXmisrc0nHs95IWuS0ZsgOs16+El7vXOynJz1IP+DzrvKLMZ
9v/PPPbllhKeajAvZkZ8cj4E88Lc61bG28/PCI/8wNwVsP72Walt/sAL91Pm
hfR2mBdnLehRXRJsop7u48sP/TsiE618DObFnsuJD4ag9ruzzGInzItwnrNS
l7jPk+IPPXRhXhAr1vJx54V/opiDI8wL1ru9qtz3Cdu2dyxpmBdjbmp2d7jv
a0OX3WhH2USwtYqxLNRpj4x2t0TD/fjqGmlD7v3vQLlvLswL7dtPxObDep25
lM/0eTab2DH2WTcZjjdE5ph4AsyLaJFEx2KYF73V3rxGMC+s30jpdMO82MeO
CVkE82JXjYVY5OYSwiGwOKQc5sW3+qgwS5gXTq/TrS/D+eqcYR7tDfPin/nz
pqL3z/fB++ctQdI1APa/KG1awW2YF2t1jzLC4fhUt4R9ew/vn+Ls6xvsuPOa
4qhlBfMivLjneBP3eXL+1e+18P7pau/Oz71+GxbfaC+DebFAap7qE+79wC7l
0Cd4/3TIagjzhrrCQejWGpgXh8bkZLjvJ7NueuyfBvNiYpFpIgXmxUbzLF91
6J/qJFrgIeifUMXO85kwL+LO9komwvsj/n22LMFXvkuNiDfiPV8E84K6OeUa
9/zqVqwyXA/zYmnt7ZgC7vNk8l3tIJgXb9bsVeT2z+7nrrMjYF6wO+uz+7m1
cK08H8yLcOOrInFQX/1z+sFSmBdH7t7Ly4R5Ufp0m6IhzIvJYOWxbu7z5I3Y
xzNgXtx+XXuf259WR99dHoT3pdWjFdl1UItGP1ZQgnnhwhi5lqRbQkh/90hJ
g3lBzjg0oQnzAv+e3C897kiGJPFzQ5HdRpgX82e/reS+j3gZlGp5wrxYkPws
Zog7fwcX8mTDejvlc1MjBebFRtaTO2YwLzx+pVm1cdfH9osv3sD6Kw48cYp7
/gvfLG9RhXmxL0lxbRa8b5zvuTknHeZFm90iE+56+5ohKaEN80J8PMgzFuaF
ZN+b9KUwL94nFkW84s7D1xF3NGBe/A4NSeSu1/7d+QtSYF7sSMzU+wHPw/j3
76u8A4wX8RPdy/RdzWFeqC48JcidFwf29K3cCvOi62b5b+680N27/fZCOP6D
64q6w2G9TppIDrPg/mJYqXWAe7y8l95fyYHr7VnLrNkFz2NeD1QUYmFezCq4
3MN9PjhXJ1AmA/PCOY7ayj1+q1BR5jjMR7voDebc3y/5sVCgAOZFuqqgPfd6
dPP+uWIK82L1g77pn//vfY71Yi70v4DZksaXcP7w7/PrsvQ/yoyarVL6dfQp
fG6daFcwDsfnpdHz2RaO73bqAwvu9u8N2UZ6wfE11BZmcOD4Ju9TqhLh+r+l
69pw91dygNnlC8cTluTiy/15hcFXwipwPHvbBBj/N98cNva7wfU58qnh/66P
m0li4QBsLyyeN/IOnP/u8w6toTD/pGKPTed+bjVr2x8DWE8mCarF3O3/Ln5T
swGOz7wjwZPFfb6e8gPC92xmKfaY/fPv/afyuJOnSW+ymbUX87hlD+33YYSe
xDxul0dfn7exYzCP++bJ+Lg9kwmYx2184g9pqZqEedwrhvv4zc6lYh63ctJv
s5CmdMzj3qbeNZtYl4F53GuDydtrt9zCPG6jsSjnBv1MzOM+zyO8Zvh3FuZx
S30Z/CrXfwfzuK/5Pernv3EX87hv3T8wI/9oLuZxe9fEyIevyMc87rDgQVPx
jgLM4664ceT0dMtCzOPeXE+xyBQqwjzuIEXlTx6vijCPO8HEta/tXjHmcb9c
tt64yKME87ilq1MCpdRLMY/7aJta842XpZjHHaxfc1w9vgzzuAX2GD3ItSzH
PO7h43M2e38oxzxu/8Pu8dkZDzCPe4as/i0+uA5TedyqE67Fd4cqMI/7z+4n
1+0vPsQ87r0BGUaVGpWYx73rQse9rbWVmMdtUk6/e2pbFeZxh39m6G5+X4V5
3B6dziGO0dWYxy0Rw6n0FX+EedyfKt0y16U+wjzu/oPrRAfUajCPWyIo9eWB
3BrM49ZT8H3kuKIW87iPq3Qo8dfUYh73zG8CdSWydZjHnXn0JsUd9jOVx90+
vGVe0tU6zOO+WS/Xf7GzDvO4z0q7rXCXqMc87hwJcR7+NfWYx31E9pTJevi5
qTxuZq7+Rb/6eszjzrYtDy75Wo953J8JqmKAzmPM49aw+tkfsecx5nGX5myb
8+HqY8zj5lUtvLuV+RjzuC2v3LHaOq0B87ir79veuKDfgHncCzvqtp7c24B5
3I+KlroWX2rAPG765Abrn40NmMf9WedgjMFoA+ZxR7+yuL1fsRHzuPdURSkN
ODViHnf+azftxBONmMd98fNWHrG7jZjHbbZ9e11XeyPmcYszP9WpTjZiHnfN
0+YBHdUmzOOeQS36XbS2CfO4TaQMojsDmzCPO6L7V3BERhPmcTe9E7Z82tSE
edy3Q8NUyj40YR53W5dN4HqJZszjTrWqi9gBz5tTedx2Apam83Y2Yx53rSBP
ZcWpZszjLlzctrw4uxnzuPUPvK0ooDRjHvfqBYXnIwabMY/7fUZF4mXhFszj
Lp4+ks/SbME87nE5tZ9G61owj/vJUKrsCb8WzON+EhfWL5jQgnncqb0Wvffv
t2Aet37ITpdyRgvmcXtdE1pbNdSCedzU5uOqjYIUzON+9CovZ60qBfO4n2aN
8tAsKZjHTVLmqz5zp2Ae9ysf+6eTJyiYx71CePL3n1QK5nGHMMVMS0oomMft
uUQj1JhJwTzud8rZd58MUzCPWzt6wbyV/K2Yx82bLZm7T74V87jV1PYJ+hi1
Yh63h9ks3wznVszjDv3TdjLOpxXzuP0E3FW8Ilsxj7to/FrwSHor5nGvzFM1
ulfWinncIwbjew/SWzGPm2fPZZ22/lbM43a89qHSerIV87id21MsneZQMY/7
qIz3mnR1KuZxp02kl81dRcU87hdrjQrnuFIxj3vcccDc3peKedxCVxUanoZT
MY97LTl59m0yFfO4FTwODZjkUjGPO6vqhaBAPRXzuIM+lw2od1Exj1vdckFc
3iAV87iFKGE8V35TMY/b755wwbA4DfO4XTk6vHnKNMzjnp9rTrQZ0jCPuzdT
JMVzDQ3zuE+qP3TesZOGedyjh8XK2v1pmMctp9aeUxtJwzzuJ1XLT/Om0DCP
O3Mpsb49h4Z53Pej55aOVtEwjztIvUbpPEnDPO7fSTMEG1/RMI9b/6Ovp9Uo
DfO4tXl1XTyn0zGPu6SfL2ruXDrmcV99fez3DFU65nFbKOpk5RjQMY/bu6hZ
45wtHfO4n7vWf/21hY553H0GUj2q3nTM45688Kgj8QQd87jzrYPvVcBxTeVx
u3gSG4LS6JjHncjDpxeYR8c87ojjdxeZVtMxj/u7R07tKgYd87iTv2QFi72g
Yx43X87wSBh8j6k8bg9lnUeav+iYx73KNe94PnyvqTzukFW71/gsZGAet+iK
DjGGFgPzuD9E5PYJmjIwj9vNSJ8/ei0D87gfpMdJvNrGwDxuOaFPHf0+DMzj
nqvTOE3jJAPzuI3Fu+65xDEwj/tDsNbFx2kMzOO20j3t2JvLwDxuCY+NGwYq
GZjHfaxg7kk9GgPzuNfa7ss+8IyBedx+9csMR4YYmMctNvp+qcYkA/O4z97q
TnOZRWIe9zPmgHHbfBLzuFusrbYYq5OYx63o9pJntxGJedxfXuxLe2VHYh63
hl1xgdMWEvO4fdOGPBZ6k5jHfSwspjs/mMQ87j7z48+WxZKYx72dL+uUbBqJ
edxel+wyJ++RmMf97lXAtoxKEvO4fZwrHpXQSMzjniHTsaqaTWIe9+DFBLbJ
BxLzuH2qT3UV/iIxj7vN5/qMzyJtmMed7fWqsVSuDf0sw50C83x129DPehml
7F1k3oZ+lr+X3QL6xjb0s5SevA/p3tuGftbMm/Pcw4Pa0M/yEDP7KR3bhn7W
hKr4zGjoiyk/a+fmEucbBW3oZ7m92v8ps64N/azpi1a93NfZhn5WVotg3UxO
G/pZZ6XNnRMn2tDP8u0Wdjo6g4l+1qjvHm0JcSb6WReEAl9kLGCin7Wzfoe3
kioT/awRC+dPc3SZ6GfpNNQenmbCRD/L8kz3nq1WTPSzwpKXyWWvY6Kf9Slz
3bsJNyb6WQUFE2EP9jLRzwoUd1M4689EP6ujWStnYwgT/ay5GaaXI84w0c/S
Oxxr8ySJiX5W+sryeWcymOhn/XQt19fNY6KfZTNff0zkIRP9rEmFfm+rJib6
WUGqr4vr2pnoZ024hHat7GWin7XX/Lar0Acm+lmqkQPflk4y0c8SbhrrvDOT
hX6WzKd9eTFSLPSz/PTPBvtCn075WUZaC+ipeiz0s5pEZphZW7LQz1JIjz5t
sIGFflb0qwo/1d0s9LM0iqq8iw6z0M/KrD28NiCChX7WB9MUvaFLLPSz6k7Y
J/tlsdDPGtW5k6JczkI/a/bVVq27FBb6WTwTl8o3QZ9O+VnGuUbuwu9Z6GdZ
POEUlv5hoZ9Fi0skjku0o5+VLpi4wx7qKT+rplb+y2Xo4yk/y9baO1Bwejv6
WW5D5pnPoO+n/Kwze9JeGY6x0M8Ks+ieNj7EQj9LMrlZ+WkfC/0sduxPPns2
C/2spKcDkjIdLPSzrgucrj5KY6GfpbX7/uzvDSz0s2QWNj5/WsVCP+ts0MwR
m1IW+lkn3yVXzM1joZ/1c2L5asFMFvpZ9efS68+ms9DPYhhSCK8kFvpZfYE3
z3XGs9DP+nSgYc6NKBb6WfJHbxtcOMlCP4u0/sEWDWChn2X/Tmjae18W+ll3
Ns0+tXEvC/2svamPHfu3s9DPurdk2esOFxb6WYX726IcHVnoZ92Y/1plCczF
KT/r9FiYqoYZC/2se5fufXhgwEI/67rZ5W+Z2iz0swxns2/KqrHQz6qqs91Z
JcdCP6tTzuNWJfT/lJ/luj/GzFKMhX5WUI5bijaslyk/K0kqTuk2Dwv9rN+3
9W6b/WCin8VncFvB5DMT/Sz776Ln6geZ6GfVKCVq3X3NRD+L/Elrf/CUiX6W
gUDrQidY31N+1s1+8147KhP9rMtGQsqMx0z0s+SUspQCq5joZ42kvX0WAfe1
KT/rz27nNimYL1N+1r58hULRTCb6WdKJN7drpjPRz2r3cJjeAfNqys+ycex9
wo5nop/l67I+5EA0E/2sg01N0btg/k35WYbPzVeeDGCin+VfER4pd5CJfpY6
ecJHZR8T/Swn+x31JTuY6Gft2JoU5unKRD/rs46SbDjM5yk/q2Ld3rdytkz0
szJmZtYqrmKin5U0elrCwZCJflbIXjGnX3A/mPKzjJ9deC6+hIl+lvjyD0sL
FJjoZ3GcXKr95jPRz5q+IJOVLMFEP2t8eqyfpRAT/ayRH6k0l+lM9LOCDDd3
z//Whn5Wb97he6lwv5vys5JXxxx82dOGfhbn8PfIZdQ29LO+OpHDjvCcNeVn
VYdpZT2414Z+VrjE0qXa6W3oZ0Wf48QciG9DP0t6wP9gZUgb+lnLmp+qbDjU
hn7WRIXb/LKdbehn6bmaqCk7t6Gflb1LlLltdRv6WaOCJftfL21DP0u/MDn9
sFIb+lmGK7JfM+a0oZ+VMTwZpc/f9jePW0vzCucriX6W8scvWvsGSPSzhIp/
3PvUQ6Kf9WLeHz7LVhL9LEX5LzMz4flpys+am2Nmvy6PRD8rSOxJd1M6iX5W
jsT5qzbnSfSzcmjC/JdDSfSzvNsGqVqHSPSzaEpH17HcSfSzLKuGhlc5k+hn
DekEz6oyJ9HPSuY3FgqH5/gpP2uzqU+iuAqJftb17xKq+ZIk+lk3DHZcmTeD
RD9rdpaNcOs3BvpZv7p2yMYMMtDPWnUrPFAMnoen/Kz3W17oZcLz8pSfNXf9
lcv81Qz0s4yNKhqK8hjoZznFjb3ed52Bfhbf/oHZQ+cZ6GeF6aePBYQz0M/S
3fVdx+EwA/2s82If+kd2M9DPemki03dtIwP9rOc3xQpkrBjoZ1XH2n56pc9A
P2tdwXnBAjUG+lkdffu2rZFmoJ8lKxS4bkSQgX7WxQZJ61eTdPSzCp0K2Nfe
09HPSnz1OHvPSzr6WU6N3z1+kHT0sz5WbJVPrqOjnyV5VKHoZDEd/awE/tir
y2/T0c9Slt0m9TmJjn5WRJDZqrBoOvpZXSab3FyP0dHPOv84OF3fk/43j7tj
wef+zXT0s3r2vTW4Cu+xU34WX6sUz5WVdPSzhLq/mHlp0dHPkh3qmkHI0dHP
SukZSHk3m45+lo14QXM3Dx39rBkjNZIkvP9O+VlO4rIXk9/Q0M+6pWL8Y88T
GvpZqqZfLwW30NDPOqg0VrmngoZ+1o6tol7O92joZ206N39MPI2GftZQsnZb
VzwN/azNkwkl/aE09LN+PRTvbDpEQz8rRJDRd28XDf2smW7lJ/esp6GfNfwl
2mivBQ39LLHzumHe+jT0s+ZtVC+yUKWhn7UkVctQXpqGftams37BVrNo6Gdd
KJWZQUxS0c/KjnM9bfKBin5WfZrTDeGXVPSz/C3vxKu2UdHPuvgjYZZFPRX9
rLDVq8L0iqnoZ9V7DjgvzqSin9UiOcfzcxIV/axqBcUl02Oo6Ge9Sfv0VjKI
in5W9o9LljxeVPSzxCfqfYfdqOhn3d25j71oLRX9rJMp1jaLzajoZ/2SX7Fo
uS4V/aytP8NN5ypQ0c86KV1VbSpBRT9r3yc+G08+KvpZYazpx7zGW9HPsvGc
FuYz0Ip+VtDP1uiyp63oZ6n5tMR2UVvRzzousF/ke3Ur+lnfj1K7R/Jb0c9y
XjL/0+CNVvSzhq9WP1e/2Ip+loE7v49FZCv6WfYfooe2BrSin6UgULnBYV8r
+lmbhuXzolxb0c/yV49NrbZrRT/LxP4UhW7cin5WLKV723PNVvSzZs6XPrVc
rhX9rGVzfhN7xFrRz7rWEy94kbcV/SzxfJeyK2MU9LMeFpwUHOynoJ/FOSsl
sqKbgn6Wv+9v+x0UCvpZCccfCUZVUtDPWmLyxi4yl4J+Vt3SZCFqOgX9rE9u
58ZEEyjoZ+mM7y/VCqegnxUQsPKA/WEK+lmXawXWFHhQ0M+6dCRm03sXCvpZ
KqspvIttKehnLTgaoGhmREE/a3rtn9A0dQr6WZJK6UpfZSnoZykF+F3QEKWg
n+VtzD9/Bw8F/axBaVZU92gL+lkelvzCmv0t6GftfpWwOaSrBf0szebX/Pda
WtDPYhR+zFv4sAX9rGvuhx+fy21BPwsGYPzT9Bb0sy6fCriikNCCftYuo6Hr
VuEt6Gc983Q8Xujfgn5Wy4Q/IeXRgn6WV+eS9W4uLehnabtGKV+xaUE/a8jl
4pFFxi3oZx3N2+wertGCfpZXRdLDFwtb0M96+9VwTGp2C/pZdrOT6lJ5WtDP
atWlZM0da0Y/y58Z9ehAfzP6WZnJr+rru5rRz0qbfnz6ttZm9LP8D6xu6ahs
Rj+rb2yRqnV+M/pZAt9v2iZfb0Y/K4M0ZfcmNqOfddom7Yx/ZDP6WT7num17
jzajn5UyTWqx3f5m9LNsE523Jm5uRj/r+dKe2oX2f/2sa5v7RjL/x886duhA
7ti2v34W1brgreiJv35W6sIN91ek/vWzvjr98j/24K+fVdEY67e6sxn9rOU5
hO8cOF9TftaZb/tffBZrQT/rutetzgDNFvSzKt/6hH+ya0E/a9G0kNwFe1vQ
z7KS6wvSiWhBP4tjGJe843oL+lmXRe+Vula0oJ91bd0xncWdLehnPfldU0l+
aEE/iy4TXp0jQEE/q/1Bbr29AgX9LFfTO5I9sL6m/Kz4hoGH8hsp6Ge5vW4L
SDtAQT9LdPblNZLRFPSz6jNCck2vU9DPMlnbxzxURkE/63qOjs8gjYJ+lvPP
3PRpMI+m/KyX27MDVkxQ0M/6/LpjG49EK/pZYs4HPo6otaKfdXmBvNNy01b0
s2pszsVMbmhFP0uIUF78y7MV/azvrc33j4e1op9V3G+RaH25Ff2s5Yd+Oey4
24p+1k7qqcX9Na3oZyWfLO981N6KflaygU/zj7et6GfJVL15lDLRin5WW7NQ
4BURKvpZ0zN+rRiD+9uUn2VNn1+br09FP2tyiWAV24aKftbgpy0Cm7ZS0c8y
uvviyZoDVPSzTGMDzhWHUtHPenrscJDbBSr6Wb7M4rXxt6joZ7FFxTW+llLR
z7rXKnv5cxMV/aw4VkHi3i4q+ll2m95NCHCo6GdNE9511eY7Ff2sa2EbBvME
aehnbYpc5XR2Pg39rPNzHb0l1GnoZxW18L0rM6ahn/X5/gpeEXsa+lkuSolz
BjfT0M8Suff80RNPGvpZh473HIsIpKGfFaIp9GDFaRr6WeKJvYF+yTT0s2L9
TyYFZNLQz8qKsSs8XkJDP8u4JzLIqZ6Gfla0zIfTi5g09LOa7yuVH3tJQz+L
8YDfLn+Yhn7W8aA63vYfNPSzSo5nq7AF6OhnzTVxOBw8h45+VtX+3hV/5Ono
Z13XKDE9As/LU35WqO3PpCZjOvpZq/tEivNs6Ohnqdm3t53bQEc/q0b8YqOl
Ox39rJO/RIhJHzr6WafUpOKcA+noZ/mIaqcHRNLRz0pMiVe/fZ6OfpbXzKru
lKt09LPGX5bap2XR0c+yPZOTa1FIRz+LKDf2yq2io5+1NH/pcY1mOvpZF+Jd
Tnmw6OhnFb4cUln9nI5+1rQXVleJd3T0s4KjPh74NEJHPyt1y6mRpgk6+ll+
UUvb7PgY6GdNeN5oCxRloJ+Vp9Dr/ESKgX6Wsqb2ny4FBvpZykKX6qM0GOhn
mZw5xfDWY6CfNdc9e+iDKQP9LLXnf9rzrRnoZ63uURHld2KgnzVHsuK98BYG
+lnB78b53XYx0M86ryV1dYU3A/0sYQnvRzvg/XPKz2pauFWbCGagn2XRknrx
bgQD/SyG7aY9e2MZ6Gf5//rZnHWRgX7Wiv5Ay+tXGehnKfT38Y3cZKCfJX3p
8ofauwz0s6Kqfi36UMhAP4t/D/XYswcM9LMeNl/sImoZ6GexS9OYgs0M9LPY
MpdbrBkM9LPojpFG7zsY6GeJJIoGucD7/JSftfvhvhaN1wz0s26o/cnwH2Cg
n1WdtC5X7iMD/SzBDW/dE78w0M866+mYFzjBQD/rt/fHDfU85F8/68gP7WgB
Ev2sNX9cPksIk+hn+XUmhPwSJ9HPUpGY6PSUItHPyj/t5K65kEQ/axkvb3WF
Iol+1qvf1CC6Gol+1vvX94eXaZHoZ40LlckrLyPRzyo7+oHTb0CinxW0SURt
zIREPyuJ/n39xVUk+lmFXtm3gq1I9LPEmL3K3+xI9LMWTkSaWzuS6GdNeLT5
Pl1Pop+lIxf2WMCVRD9LafbpL0e2kuhnXdOYqCreSaKftVQv986FPST6WQNa
AV65+0n0s/K/v97p6UOin2U7T1vk10ES/SyHptz6lsMk+lnXjN5amRwj0c8q
VEx43nucRD8r/FSZ1vYQEv0s7Y4XQ6fDSfSzmOp6E68iSfSzFpWv3TQYQ6Kf
latSpSUbS6Kflf7p+NnF50j0s752y94aTiDRz+r5tu1Kx0US/azKsWKpgMsk
+ll6/U73x1NI9LOSMhork6+S6GcJxuh5f00n0c/aXW40fPgGiX6WkXdIKuMm
iX6WlNbIzPe3SfSz0gUN3ytmk+hnreE1WS6fQ6KftbNqPofnHol+1vQvI6/G
c0n0sxYYR4iU55PoZ7WbbxE+fZ9EP8u91p5UKSLRz+rZPu50r5hEP2t85uyL
JqUk+lkP1c9Z3Sgj0c+SYd/bLvyARD9r0P2a644KEv2sW71bj51+SKKfZXyu
daSskkQ/a+X68u+Pqkj0s1K8N5TerybRz9oosu7DrUck+lnzBr7LH60h0c+S
KQ2+bVFLop+VxP+W9yfUU36WaOxzRnIdiX7WPJ8hcc16Ev2s0DPhM7OhnvKz
Ssxn75R6TKKfZcXrX30E6ik/a9Ec30UPoZ7ysxReGSmPQj3lZ81q6t0r2fA3
j3uj4+qF6g3/5XH/l8f9Xx73f3nc/+Vx/5fH/V8e93953P/lcf+Xx/1fHvd/
edz/5XH/l8f9/8887vP2c0TTSzoJQ8rZM4KC7US/up6VYGMnUfU+fY6PZDuh
/sTENKGzk3jcM53HT7QdvalrPft1dln89aayx/iH8xyaiY5f5S9Xy3KIR6fb
lV7D+/zEpo6rLcrwPv3k4BsbeD/P8exmj2hyCOPW4MOpUDu8cgxR1Yf35Ty7
X91QcyqNwjxNOUSw+3YnAXhfn7VOWMDRikOM9STrK0K9dZH01qNrOUREl7Cd
NtSZ61PE7rhwCL+yW4/23CX/lRfu7lCtnnu/kxB8+q1lK1878a5iIr6htpNI
suOZfUuqneA/7P/jArOT6DUeVd4u1o4+1C6fXQdqrf/6UGbHJFaHWTYTu67w
H1wwn0N4GR1Y1gjfr+f8Ma1cRQ6RUThgoAvHP6ZWnPNdnUOk8g+lxkB936Pi
1fTlHGL1KUmVVqgrWp4t8DbhEAHXnB/9hFr9+7TsLRYcwnN0mCoL3+fiufRE
lzXwPi6Q0qQJta3dhvC8DRyi91nx77VF5L/yzattvT/HP+gkNOXf89SItBN9
6Qd+OVI6Cetry/Pd5rb/9aF+cvinr2omtt/9KTqozSFWnoi2uwv7H9rydr7d
Cg7RkXjqzluopQtS+/YRHMJevf6FKOx/KEtyn7kNh7jdb5atCrXy/Usql9bB
+bYo8iqB7//PPHV7htjD4vxOYpWPkucM3naC8+dFYcajTsJAfXmW8Lx24vCq
eNdLZCexqE+9doN4O/pMNjwiSQdt//pMsRIpXXvheBcP5OnPlOEQFaMJlmWw
P4o65Wu6AodgWB0YUYLjTT0tl/BzCYf4WCi2JgRqd7UPiaNLOYTReIpNPdTy
jhpD3sYcQiD83IVvUFfSfwbsNOcQ600rHsjA99Fu2qFhbc8hrp6bnawB9VXL
pYb318P1+2AsZ1FG/isPPqu1JiyprJP4kf3s/W6hduLNGycFzeZO4pHaoRe7
4ftN+UxuJjLSxavhfVLQe/y9FocobrD/nQH7T5OdT19hwPXaF35/CXW43mDh
fjMOkSBQ82AW7D84WNzA1ppDuO9VOacMdd07l7pIRw4hXCl9jdvv/8yff+sv
5fWuvpMQr3i07gj081WlGV0bLDlEfPLpG3Lw819dno17OHCIrph3uVpQT/lL
H6hd3zeYNRNurAXJK205hO7Pj+GL4fMzgazYW07QbwqVnQGPyH/l2deImISX
53USm/USul/wtBOet9vME6o7iS0SvMWP57QTd+9cEUhidBKn2CtE2+D6TnlG
4RmOS6zt/npGO7WST2yG/QufD78SKs0heE+vK8yH61v33Y89D67vx9wFRQvh
/Pis2BQRCtc3x+tZXBDUD8+cHvSC63vqTtDKR1BvvLDBediIQ8R4Sr75AjXv
iontfas5xLPSm5LS8H1+9tYG1dhxiLzl7X3c//5nYS6fpAvX98vX0PumD8i/
ntKqMzOmazgS82cNWqeWdhJ/eLv5DGa1Ex6nzUvmN3USOuUt397B9Z3yjKwe
yt4+a95MPKnI4ByE60tddqwuHfb/JaRU+T7Ms4U7FKPYUJcGiktzYJ75ahjH
z4T9P+4XXUSDeWZ1QstLCerzvA9EfsI8K1+if5J7fdFHytixSm3xSmLfPMHJ
zrpO4mWYoN83uL595/hqumBeJAoJmy6Cn2/0N7F4AfPC4mn/au71nfKKslWr
QzWIZuKWiUxoLaxfuT170tTg802XlvXMh+ubU6x/I6mW/OsZuQsVH1JcTOzf
9n5RcU0nofLkoIwrzH/3u79eMGB98BlMGnDn0TKxuY5N0J+rhcNvqkA9Sv1y
WAjmge/Oh7nc4/cgVbq/Pe4knvd/1P0Ev7/Y+HjOe+g/d8616dzPpzyity8N
j540/R+PqM7jMo+UGPFdi7nHEPqrnjVthR301+IASpwA9Nd0oXLOQugvy63y
O+ZCf+XHGpcLS7Sj3+Pl7f2lyO6v33M4LjXTGbYfusubZgT99Wji6cu70F/V
O5vWtstziPZPvrHzuf2T8PkEAf11aZmm6jGo9z3svKwC/UWoMHWqoP5YPBCV
C/2lOFwaPQa16vvvrNvQX443DVZJwfd5c9DvRjD0l6zTxghuf0nXS5l/dob7
wWTGN+MK8q8fxPz1y19zHbFRPVR9PvTX4WWmD2/A/VZ5i8nPC3C/fVYZwb8E
zteU36OyUcZrHPqrRmxlnw7012X/kLSrsP+Mgmksb+iv/ufiDU+hdryStSYH
+uvdz01+M2D/766IXIyH/vKX3sTi3i+PJu7Xq4D+migb9OCef/SA6uy0+DXM
CNWBaZYO0F9BNjXhRtLthIDF9GWp0F+LckaiF8LP5/4Z9roC/bX84gwBbn9N
+TxhN5eYp0B/NY9IjYZDf710bVTk9pepwpvfXdAPwieO8GXWkX/9nozXcRqL
NYnF2m/3L4H+mphQbyuC9WSzooAvFvrLI7iNw52/m5okHsdAf322s5bh9tfT
zVlXWmD+XXcoyuYev3LGIvlD0F8hRaqrlsJ6mE1Z0pYD/RW/R+gZ9/im/J2L
AzsMOKb/4++sErcLUpRGX4fsGjTYCcd/56jAAAHbb/T9dJ67/WwLseLtME/p
kyU7y2D7L97EyirA9uWkdI5zt58dO/bEGJ4fGuVnRv2E6yVkaumwDr5vp9An
8jFcD/M8yildON+bna4v5m5vytPJue9RLGb6P55OuF+DuBQPIVlz1eVHbidx
ZcWdkd9/WMTMl5a6j6s6iVlicok06G+JsjdnO+nQ/yNusRpQT/kzW0Wlng3Y
/fVn6l5XaJMrmwmDNTs9pKDfjzy2+3IH+t340qeYQuj3lZMbxqW5/3/EpPa7
HPR79krm56NQVztP+kyHfp99sUytknt/bCi6Hgf9LnE1+An3/6dUWH+Pi4J+
Xz77bAf3/6d0lVGKN0O/Pzi23Ynb7xHhc66woN+//ypKewj9jv5NquHxJfnr
CP9KW1k2PF/eVTp9bSP0O9/jBxlrod9HPkQK28P5m/JnFmwxcNCA58mSasGd
YtDvbttDTl+B/X+1XnzHFvo9uqaxtwfqBfcO7T0D/X72z/Ne7vNh0BdhhwPQ
70sDxyK5/e7ZXWuTDOd/T+A5V+75R8/GqVbpqCZBCDiFcmZAv3u+udX7Ba5v
6jXe90HQ7wHBw4u5/X7d2jIkEPr9UcWud9x5N+XLlEr8UWJAv2xeI5W3C/pd
7eDvfu7zkK6niUQZXP9VOyUeaMD5Rn+mjh4kqKFNzEzZJfwWnn9YaqoGO6Hf
jUMFpD2h35+I8NZx+50jJ3FyP/R7T01xB/d+zyeY1qgO/b1p7Tub9XB8vLMj
+mKg/15YxDVw+2/Ki+m6lii1yOx/vJjwAUW9xbLowQTPLHvOhs+vVu2YWAj9
nXFAOYZ7PmLy4jfJQH+nPGnf3wXbZ6q/0fkD3zfTRXYHd/sxY4eCv8L6nGVQ
SL0L1+d3ZPpOLfh+jmtO53F/X39M/rIonF/zbYWS3HrKf1GPt7xkbfo//gvP
wsCzijOJKf9FqzN+zhP4/JTdbIVn8PvpVxT8ub9vHRp9IxGux4xJ1yBpmD+y
p1hVVPi+xId9n7jHU6pV0LELjt9POzmZ+/PSX4cN/eF4MtScZE2gH6b8Fl27
K6xnK//Hb+E5I6cnNWJWzfFdmXGIhX7LNMZZvnv7HmD9//X5/wOXa50/
   "], {{{}, {}, {}, {}, {}, {}, {}, 
     {GrayLevel[0.5], EdgeForm[None], 
      GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwV1mW4FdUCgOENAtIoYVHSDZLS3d3d0t3d3V3S3d3doYgondLd3VzuOz/e
51trz8yBWWvPOZOoYduKbcKGQqEwhMKFQqNjhUIRDCNGD4XSxwiFrmpinamn
+M64sY7jCJHNc2oNBrGD/xE3uJ4ydGMNL/iaCIQnHF8RljCE+BLN9XzmEx/5
wHve8ZY3vOYVL3nBc57xlCc85hEPecB97nGXO9zmFje5wXWucZUr/MdlLnGR
C5znHGc5w2lOcZIT/Ms/HOdvjvEXR/mTPzjCYQ5xkAPsZx972cNudrGTHWxn
G1vZwmY2sZENrGcda1nDalaxkhUsZxlLWcJiFrGQBcxnHnOZw2xmMZMZTOd3
pjGVKUxmEhOZwHjGMZYxjGYUIxnBcIYxlCEMZhADGUB/+tGXPvSmFz3pQXe6
0ZUudKYTHelAe9rRlja0phUtaUFzmtGUJjSmEb/RkAbUpx51qUNtalGTGlSn
GlWpQmUqUZEKlKccZSlDaUpRkhIUpxhFKUJhClGQAuQnH3nJQ25ykZMcZOdX
spGVLGQmExn5hQykJx1pSUNqUpGSFCQnGUlJQmIS8TMJSUB84hGXn/iRH/ie
74hDbGIRk2/5hhhEJxpRiUJkIhGRr4lAeMLxFWEJQ4gvUT3/fOYTH/nAe97x
lje85hUvecFznvGUJzzmEQ95wH3ucZc73OYWN7nBda5xlSv8x2UucZELnOcc
ZznDaU5xkhP8yz8c52+O8RdH+ZM/OMJhDnGQA+xnH3vZw252sZMdbGcbW9nC
ZjaxkQ2sZx1rWcNqVrGSFSxnGUtZwmIWsZAFzGcec5nDbGYxkxlM53emMZUp
TGYSE5nAeMYxljGMZhQjGcFwhjGUIQxmEAMZQH/60Zc+9KYXPelBd7rRlS50
phMd6UB72tGWNrSmFS1pQXOa0ZQmNKYRv9GQBtSnHnWpQ21qUZMaVKcaVfnJ
36p0TOQo0fwdLK1n+dG4qybR1fqcKq5JZ37FOJHO0JPEMW6kYzlMJPMcWp2B
bOdz8DNJSym6sIpnVPZzK1GRCpSnHGUpQ2lKUZISFKcYRSlCYQpRkALkJx95
yUNucpGTHGTnV7KRlSxkJhMZ+YUMpA/ul7SkITWpSEkKkpOMpCQhMYn4mYQk
ID7xiBusNz/yA98Hde9pKElnVvI0eD8J9lTHcIiI1jO7TuFvvjGvpqn1fPCe
ogM0mW7TT3zPNP4hps/r6Qj2Be8s5qm1BJ1YwZNgH4N10ar0Zysfg/8PqShO
R5bzmNjOj0VMvuUbYhCdaEQlCpGJRES+JgLhCcdXhCUMIb5E8buTz3ziIx94
zzve8obXvOIlL3jOM57yhMc84iEPuM897nKH29ziJje4zjWucoX/uMwlLnKB
85zjLGc4zSlOcoI41iQlxejAMh7xr2OxNQVFac9SHgb741gsTU4R2rGEBxx3
LFvw3NGPLXwI9jPYawrTlsXcD74bzs8aPE/0ZTPv+Za6DGdv8L5q/5NqIdqw
iHscc31DHc3B4D3XeVm0En3YxLvg+0cdhrEnePd1XhKdwJ9ENS+oZ/jBuLUu
5C5/BWurP/t8up4IvkfGDfQi8Y1HBeuhBzSCZg6eE72kCXRysJZ6TGNoxeD7
qef0J+2tSXWjvg3OCX7vmF/WhDo12Cc9HqyN1tYLxDMeqrsJY5xYx/MHUcwL
6Ong2TJupQu4w1H39Huwz8RyrL6OZD/hzTPppODeiW5eQXuxgTfBZ9RiCLsI
OSeR5qcl87kdrK1/J6OWpyfreU00ajKYnXwJ1pd8tGAet4L7cP0vWo4erONV
sF/BupCX5szlJkecn0HL0p21vAzWItgH8tCMOdzgsPMjB3tIbpoym+sccixS
sMbkogmzuBZ81xw7wH72sZc97GYXO9nBdraxlS1sZhMb2cB61rGWNaxmFStZ
wXKWsZQlLGYRC1nAfOYxlznMZhYzmcH0YJ+ZxlSmMJlJTGQC4xnHWMYwmlGM
ZATDGcZQhjCYQQxkAP3pR1/60Jte9KQH3elGV7rQmU50pAPtaUdb2tCaVrSk
Bc1pRlOa0JhG/BY8+zSgPvWoSx1qU4ua1KA61ahKFSpTiYpUoDzlKEsZSlOK
kpSgOMUoShEKU4iCFCA/+chLHnKTi5zkIDu/ko2sZCEzmcjI/wG7DDLF
        "]]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \
{}, {}, {}, {}, {}, {}, {}, {}, {}, 
     {GrayLevel[0.5], EdgeForm[None], 
      GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwV1XV4V2UUAOAfSAnKKAmB0aN7o0cO2AYbY3TDRnd3d3d3g6hICkoqGKSC
AoKglGKApIGC+u6P9zn3nO8+z/fc891zb76EfvF9kwcCgWS8cFE6KBCYmzkQ
KCOWpRzlCSWMClSkEpWpQlWqEU51alCTWtSmDhHUpR71iSSKaBrQkBhiaUQc
jYmnCU1pRnNa0JJWtKYNbWlHezrQkU4kkEhnutCVbnSnBz3pRW/60Jd+9GcA
AxnEYIYwlGEMZwQjGcVoxjCWcYxnAhOZxGSmMJVpTGcGM5nFbOYk9Z55zGcB
C1nEYpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJVtbOctdvA27/AuO3mPXexm
D3vZx37e5wAH+YAPOcRhjnCUYxznIz7mBCf5hE/5jM85xWnOcJZznOcLvuQC
F/mKr7nEZa7wDVe5xrdc5wbf8T03ucVt7nCXH/iRe/zEz/zCr9znAb/xkEc8
5glPecbv/MGf/MVz/uYfXvCSf/mPQAYzRXJeIQUpSUVq0vAqaUnHa7xOeoLI
QEYykZksvEFWstHMjIYQ4HYmPeQIifJQ0vNIfpXs7m8uL0wy7qgNEiMIZixx
nFXvLYYzhWyMJpbn1oaKkeTnqLyzGEYQj+XXyGGvFvIiJOeu2jmO8aa1nOQi
N8HkIS/5yE8BClKIEApThKIUozglKEkpSlOGspSjPKGEUYGKVKIyVahKNcKp
Tg1qUova1CGCutSjPpFEEU0DGhJDLI2IozHxNKFp0vkk9TypF7SkFa1pQ1va
0Z4OdKQTCSQmvTOONW86z052gslIVtIRRErSsCONOWY729jKFjaziY1sYD3r
WMsaVrOKlaxgOctYyhIWs4iFLGA+85jLHGYzi5nMYDrTmMoUJjOJiUxgPOMY
yxhGM4qRjGA4wxjKEAYziIEMoD/96EsfetOLnvSgO93oShc6k0gCnehIB9rT
jra0oTWtaEkLmtOMpjQhnsbE0YhYYmhIA6KJIpL61KMuEdShNrWoSQ2qE041
qlKFylSiIhUII5TylKMsZShNKUpSguIUoyhFKEwIhShIAfKTj7zkIZjc5CIn
b5KD7GQjK2+QhcxkIiMZCCI9r/Ma6UjLq6QhNalISQpeITnJCPBfat9HXvKC
f/ib5/zFn/zB7zzjKU94zCMe8hsPuM+v/MLP/MQ9fuQH7nKH29ziJt/zHTe4
zrdc4yrfcIXLXOJrvuIiF/iSLzjPOc5yhtOc4nM+41M+4SQn+JiPOM4xjnKE
wxziQz7gIAd4n/3sYy972M0u3mMn7/IOb7ODt9jONrayhc1sYiMbWM861rKG
1axiJStYzjKWsoTFLGIhC5jPPOYyh9nMYiYzmM40pjKFyUxiIhMYzzjGMobR
jGIkIxjOMIYyhMEMYiAD6E8/+tKH3vSiJz3oTje60oXOJJJAJzrSgfa0oy1t
aE0rWtKC5jSjKU2IpzFxNCKWGBrSgGiiiKQ+9ahLBHWoTS1qUoPqhFONqlSh
MpWoSAXCCKU85ShLGUpTipKUoDjFKEoRChNCIQpSgPzkIy95CCY3Kfw7con/
A2/Ifns=
         "]], PolygonBox[CompressedData["
1:eJwV1AV0FGcXBuCFQAgJEhJokbZoBYcK2iJtgUKhtFCnSnEL7u7u7u7uLklw
d3d3d/j5nz1nn3O/987sntn57kzmqjGVGiQMBAIJqBISCPgEqkUGAtWpQU1q
UZs61KUe9WlADA1pRGOa0JRmNKcFLWlFa9rQlna0pwMd6URnutCVbnSnBz3p
RW/60Jd+9GcAAxnEYIYwlGEMZwQjGcVoxjCWcYxnAhOZxGSmMJVpTGcGM5nF
bOYwl3nMZwELWcRilrCUZSxnBStZxWrWsJZ1rGcDG9lELHHEs5ktbGUb29nB
Tnaxmz3sZR/7OcBBDnGYIxzlGMc5wUlOcZoznOUc57nARS5xmStc5RrXucFN
bnGbO9zlHvd5wEMe8ZgnPOUZz3nBS17xmv/xhkAq80dCQkhEYkJJQhi/RgcC
2QnhcpT/zkaqywWI5IF8khjrEqTnldxSLUc2OlGZXiT1u7+pOehCIlpTniu+
t5dNhDsvgmQkJwUpiSQVUUSTmjS8xdukJR3pycA7vMt7ZCQTmclCVrLxPh/w
IR+RnRzkJBe5yUNe8pGfj/mET/mMAhSkEIUpQlE+5wuKUZwSlORLvuJrSlGa
MnxDWcrxLeWpwHdU5Ht+oBKV+ZGf+JlfgnsWvL/8ThX+4E/+4m/+4V+q8h/V
qE4NalKL2tShLvWoTwNiaEgjGtOEpjSjOS1oSSta04a2tKM9HehIJzrTha50
ozs96EkvetOHvvSjPwMYyCAGM4ShDGM4IxjJKEYzhrGMYzwTmMgkJjOFqUxj
OjOYySxmM4e5zGM+C1jIIhazhKUsYzkrWMkqVrOGtaxjPRvYyCZiiSOezcH9
Mv85ScxV87+PWLYE91EvF6Fc09tPHFuD+6uXmyRc1ztAPDXkgqTioXyKbcFZ
kPMQxg29g2ymplyIKB7Jp9kenBs5b/C55abeoeA1UUsuTDSP5TPsCM6YnI9w
bukdpr51MdLyInjd1LYuQmqeyM3U0mTirNxQLUkGXss7g7NrnZ8Ibus1VUuR
kSNyA7U46WhHRV7qt1DL0p2sdKQS2xyroxalK2loQwV68NTxMmpmOgT3xmsz
EVHh7iuRpCQFyUlGBOEkJYwkhJKYRISQkAQEeJPUO5nXvOIlL3jOM57yhMc8
4iEPuM897nKH29ziJje4zjWucoXLXOIiFzjPOc5yhtOc4iQnOM4xjnKEwxzi
IAfYzz72sofd7GInO9jONrayhc3EE0csm9jIBtazjrWsYTWrWMkKlrOMpSxh
MYtYyALmM4+5zGE2s5jJDKYzjalMYTKTmMgExjOOsYxhNKMYyQiGM4yhDGEw
gxjIAPrTj770oTe96EkPutONrnShM53oSAfa0462tKE1rWhJC5rTjKY0oTGN
aEgMDahPPepSh9rUoiY1qE41/qMq//IPf/MXf/IHVfid3/iVX/iZn/iRylTi
B76nIt9RgfJ8SznK8g1lKE0pvuYrvqQkJShOMb7gc4pShMIUoiAF+IxP+YSP
yU8+8pKH3OQiJznIzkd8yAe8TzaykoXMZCIj7/Eu75CB9KQjLW/zFmlITTRR
pCKSlKQgOcmIIJykhJGEUBKTiBASkoAAb8I8/7zmFS95wXOe8ZQnPOYRD3nA
fe5xlzvc5hY3ucF1rnGVK1zmEhe5wHnOcZYznOYUJznBcY5xlCMc5hAHOcB+
9rGXPexmFzvZwXa2sZUtbCaeOGLZxEY2sJ51rGUNq1nFSlawnGUsZQmLWcRC
FjCfecwlNMJtJTnRpCcLcxzLrv4fj1Lv6Q==
         "]]}]}, 
     {GrayLevel[0.5], EdgeForm[None], 
      GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwV02OUEGgUBuBJ227arGmappps27bNybbt2mzbtluzNtu27bZ95sdz7n3P
9+ve892QsC41OkcMCAiIQKAmshovWkBAfBKQkEQkJglJCSQZQSQnmBSEkJJU
pCaUNKQlHenJQEYykZksZCUb2clBTnKRmzzkJR/5KUBBClGYIhSlGMUpQUlK
UZoylKUc5alARSpRmSpUpRrVqUFNalGbOtSlHvVpQEMa0ZgmNKUZzQmjBS1p
RWva0JZ2tKcDHelEZ7rQlW50pwc96UVv+tCXfvRnAAMZxGCGMJRhDGcEIxnF
aMYwlnH8wHgmMJFJTGYKU5nGdGYwk1nMZg5zmcd8FrCQRSxmCUtZxnJWsJJV
rGYNa1nHejawkU1sZgtb2cZ2drCTXexmD3vZx34O8CM/8TO/8Cu/8Tt/8Cd/
8Tf/cJBD/MthjnCUYxznBCc5xWnOcJZznOcCF7nEZa5wlWtc5wY3ucVt7nCX
e9znAQ95xGOe8JRnPOcFL3nFa97wlne85wMf+cRnvvAfXwmI7oaJSCoCiU8s
ohGV1CQjAbGJQShBJCIuaQgmCekIIQOROBDX/4nnNhhOKBXpx1dvQWpJunND
fk9CfSE6cEg+zzNiyjkJY7+8j73sYTe72MkOtrONrWxhM5vYyAbWs461rGE1
q1jJCpazjKUsYTGLWMgC5jOPucxhNrOYyQymM42pTGEyk5jIBMaH74VxjGUM
oxnFSEYwnGEMZQiDGcRABtCffvSlD73pRU960J1udKULnelERzrQnna0pQ2t
aUVLWhBGc5rRlCY0phENaUB96lGXOtSmFjWpQXWqUZUqVKYSFalAecpRljKU
phQlKUFxilGUIhSmEAUpQH7ykZc85CYXOclBdrKRlSxkJhMZyUB60pGWNISS
mlSkJIQUBJOcIJIRSFKSkJhEJCQB8YlHXOIQm++JRUxiEJ1ofMe3ROUbohCZ
SEQkAgF8jeNu+cJnPvGRD7znHW95w2te8ZIXPOcZT3nCYx7xkAfc5x53ucNt
bnGTG1znGle5wmUucZELnOccZznDaU5xkhMc5xhHOcJB85zjafgu3HIOmnM4
fMbw/epL0I3r8li1OlGs4n/WHyUM
        "]]]}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, 
     {GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJwV02WUVVUYBuCDrsX0DF1KDKUg3Q3SYQ6lgApD12DSaVCjgAqCCjadtnQZ
Q4eCoIKkCLLojrV89o/nvt/e+zv37rPPuanpg9IyskVRlOUjM3cUxahjiSOe
BBJJIpkUcpCTXLgkykNe8pGfAhSkEPdxP4UpQlGKkUpxSlCSUpTmAR6kDGV5
iHKUpwIVqURlqlCValSnBjWpRW3qhL24obqyHvVpQEMa8TCNaUJTmtGcFrSk
Fa1pwyM8ymM8zhM8SRptaUd7OtCRp3iaTnSmC8/wLM/RlW6k050e9KQXvelD
X/rRnwEMJINBPM8LvMhLvMwrDGYIQxnGcEYwklGMZgxjGcervMbrvBHO2wMf
LycwkUlMJpM3eYspTGUab/MO7zKdGbzHTGbxPh9w/p4o+oyulCM7571zH1q7
oP6cbpQnhgvWZlu7qP6CdCoQy0Vr2e+NopXqITShMHP0X5Jz6U5F4rikP0b/
KvVQmlKEj/RflvPoQSXiyas3S44njcuujzW3Wj2MZhTlY9dfkfPpSWUSyKd3
i5xAW664Ps7cGvVwmlPK+ICcSbGwf+PdcgqdwhkZHwm/wSd+56pcQK9wDtaO
ySoUV++T00kkv/FWOZGq6lOyHWXUh2QjOVvWkmfDXuRV+4uXa43ryhHhLOQJ
2Vi2kKXlQdlQzpI15JlwFjI1nKfcIxvIqbK6PC07h2eqPhrugzrqc/JT93RN
LqR3eFbmj4c9U0K9X84giQLG2+Qk2nPNfhPMrVOPpGU4h/BMzO2V0+gS3je/
cV0uog/VSKagvu1yMh247vsSza1Xj6JV2EN4J11/Qy6mb7gnUrihP0n/BvVo
WlMyvKf6b8ol9AtnRA5u6p9r7ZZ6Kf2pSU5uWZtn7bZ6GQPCsyEXt63Nt7aA
hSxiMUtYyjKWs4Iv+Yqv+YZv+Y7v+YGVrGI1a1jLOtazgY1sYjM/8hM/8wtZ
bGEr29jODnayi93sYS+/8hv72M/vHOAgf/Anf3GIw/zNEY5yjOOc4CT/cIp/
Oc0Z7jiX5QykNrm545ySPY+N6jG0Cf8v/tN/V64gI7x75KGQ3h0yk46UNT4s
53DXd6UYb1LXk2PD/1qelP8DFvLbMw==
       "]], LineBox[CompressedData["
1:eJwl1HfYzWUYB/DfeUdIyt7ktWdJJHsre4TIzIgyXluZWWVvyqZBZtmjYc9k
l+yipPSGyOb1+V398Tnf+76f53rOuc75nSeubXzDbpEgCPp6qRIdBLWjgiCf
PCVnkpcc+mNyMi352/5HchXxlCEdj5yRYO0frnKN6/zLDW7yH7e4zR3uco/7
POBheDaJBM6LEEU0McTyBElISjKeJDlPkYKneYaUpCI1aUhLOtKTgYxkIjNZ
yEo2svMsOYgjJ7nITR7yko/8FKAghShMEZ7jeYryAsV4keKU4CVK8jKlKE0Z
ylKO8lSgIpWoHP42VKUa1XmFV6lBTWpRmzrUpR71aUBDXqMRjWnC6zSlGW/Q
nBa0pBWtacObtKUd7enAW3SkE2/zDp3pQlfCByqe7vSgJ73oTZ/I/89aP97l
PfozgIEMYjBDeJ+hDGM4IxjJB3zIKEYzhrGMYzwTmMgkJjOFqUxjOjP4iI+Z
ySxmM4e5zGM+C1jIJ3zKZ3zOIhbzBUtYyjKWs4KVfMlXrGI1a1jLOtazgY1s
YjNf8w3f8h1b2Mo2trODnexiN3vYyz728z0H+IGDHOIwRzjKMY7zIz9xgp85
ySlOc4aznOM8v/ArF7jIb/zOJf4g0X9+Nd0pS3oSzS8TuDPW6HtQjgwE/Gkt
Ym2tuiflyUiElOY75FDqhPcQf9kfZb5O3YsKZCKKVOY75TDqkp8r9kebr1f3
piKZiSa1+S45nHoUCO8y+2PMN6j7UIksIbODchxNiSGN2W45gvrh++lPy1kU
JE5/XE6hFQnOjjXbqO5LZXLrT8gZZA3pD8nxFFdfls0opD4ffh45T5aSCTKW
tOo94fcqR8pi8pKsKhvIM8ympP6KfAxIVLOo
       "]]}, 
     {GrayLevel[0], LineBox[CompressedData["
1:eJwV0uN/0FEUB+DfWnZtmcvmn5GXXcu2bdu2bdu2t1pttWxrPb147vfc8+qe
87kRUV0iO4cEQRDimBgWBJVCg6AyVahKNapTg0hqUova1KEu9ahPAxrSiMY0
oSnNaE4ULWhJK1rThra0oz0d6EgnOtOFrnSjOz3oSS9604e+9KM/AxjIIAYz
hKEMYzgjGMkoRjOGsYxjPBOYyCQmM4WpTGM6M5jJLGYzh7nMYz4LWMgiFrOE
pSxjOStYySpWs4a1rGM9G9jIJjazha1sYzs72MkudrOHvexjPwc4yCEOc4Sj
HOM4JzjJKU5zhrOc4zwXuMglLnOFq1zjOje4yS1uc4e73OM+D4gmhoc8IpbH
PCGOeJ7yjASe84KXvOI1b3jLO97zgY984jNf+Mo3vvODn/ziN3/4SyJBUv+b
JISSlGQkJwUpSUVq0pCWdKQnAxnJRGbCCCcLWclGdnKQk1zkJg95yUd+IihA
QQpRmCIUpRjFKUFJSlGaMpSlHOWp8P+9Kcyb3I6II5q7pNH/Ld+TQCwV/8+m
/0P9hngyuofwRR0ukxGjTi8T5T9p1o3I
       "]], LineBox[CompressedData["
1:eJwV1mW7kFUQBdCXupSI0ogICNIoJd3d3d3d3d3d3d3d3d0dCoLSCtIl4Lof
1rP3mfMDZpI0aFuhTZggCM6EDYI4EYPgZUgQxJTheax/K8PyRr/OV/on+ZyH
3CFz+CCIbP5Bf8o9bnGDX/1lISvZyE4OcpKL3OQhL/nITwEKUojCFKEoxShO
CUpSitKUoSzlKE8FKlKJylShKtWoTg1qUova1KEu9ahPAxrSiMY0oSnNaE4L
WtKK1rShLe1oTwc60onOdKEr3ehOD3rSi970IW3UIOgr+9GfAQxkEIMZwlCG
MZwRjGQUoxnDWMYxnglMZBKTmcJUpjGdGcxkFrOZw1zmMZ8FLGQRi1nCUpax
nBWsZBWrWcNa1rGeDWxkE5vZwla2sZ0d7GQXu9nDXvaxnwMc5BCHOcJRjnGc
E5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Dd+5xa3+YM73OVP/uIe93nAQx7x
mCf8zT885Rn/8pwXvOQVr3nDW97xng985D8+8ZkvBBGCIAxhCUd4IhBCRCIR
mShE5Sui8TXR+YZviUFMYhGbOMQlHvH5jgR8T0J+IBGJScKPJCUZP5GcFKQk
FalJQ1rS8TO/kJ4MZCQTmfmVLGQlG9nJQU5ykZs85CUf+SlAQQpRmCIUpRjF
KUFJSlGaMpSlHOWpQEUqUZkqVKUa1alBTWpRmzrUpR71aUBDGtGYJjSlGc1p
QUta0Zo2tKUd7elARzrRmS50pRvd6UFPetGbPvSlH/0ZwEAGMZghDGUYwxnB
SEYxmjGMZRzjmcBEJjGZKUxlGtOZwUxmMZs5zGUe81nAQhaxmCUsZRnLWcFK
VrGaNaxlHevZwEY2sZktbGUb29nBTnaxmz3sZR/7OcBBDnGYIxzlGMc5wUlO
cZoznOUc57nARS5xmStc5RrXucFNfuN3bnGbP7jDXf7kL+5xnwc85BGPecLf
/MNTnvEvz3nBS17xmje85R3v+cBH/uMTn/lCYGeGISzhCE8EQohIJCIThaih
+5hofE10vgnd2cQI3ePEIjZxiEs84vMdCfiehPxAIhKThB9JSjJ+IjkpSEkq
UpOGtKTjZ34hPRnISKbQ2yD0BiALWclGdnKQk1zkJg95yUd+ClCQQhSmCEUp
RnFKUJJSlKYMZSlHeSpQkUpUpgpVqUZ1alCTWtSmDnWpR30a0JBGNKYJTWlG
c1rQkla0pg1taUd7OtCRTnSmC13pRnd60JNe9KYPfelHfwYwkEEMZghDGcZw
RjCSUYxmDGMZx3gmMJFJTGYKU5nGdGYwk1nMZg5zmcd8FrCQRSxmCUtZxnJW
sJJVrGYNa1nHejawkU1sZgtb2cZ2drCTXexmD3vZx34OcJBDHOYIRznGcU5w
klOc5gxnOcd5LnCRS1zmClHcqB/lM+5zm5tEM/8sX/CIu0Q3C3ilPyGGHo63
emwZQlyuev8PrLZ9Ww==
       "]]}, 
     {GrayLevel[0], LineBox[CompressedData["
1:eJwN1WVjkAUAhdEXAZlMJFQkx0aN7u7uHN0wuja6u7tzdIdggoTSKmESSiOh
dCiphHA+nOf+hBsRHRsVEy8IgjhJlygIEoQGQXobRgbCiSAjmchMFrISSTay
k4Oc5CI3echLPvJTgIIUojBFKEoxilOCkpSiNGUoSznKU4GKVKIyVahKNapT
g5rUojZ1qEs96hNFAxrSiMY0oSnNaE4LWtKK1rShLe2Ipj0d6EgnOtOFrnSj
Oz3oSQyx9KI3fehLP/ozgIEMYjBDGMowhjOCkYxiNGMYyzjGM4GJTGIyU5jK
NKYzg5nMYjZzmMs85rOAhSxiMXEsYSnLWM4KVrKK1axhLetYzwY2sonNfMwW
tvIJn/IZn/MFX7KN7XzFDnayi918zTfsYS/72M8BDnKIb/mO7znMEY5yjB/4
kZ/4mV/4leOc4CSn+I3fOc0ZznKO81zgIpf4g8tc4SrX+JO/uM4NbnKL29zh
Lve4zwP+5h8e8ojHPOEpz/iX/3jOC17yiv95TRASBPF4i/gkICFvk4gQ3iEx
obxLEt4jKclITgre5wM+JCUfkYrUpCEt6UhPGBkIJ4KMZCIzWchKJNnITg5y
kovc5CEv+chPAQpSiMIUoSjFKE4JSlKK0pShLOUoTwUqUonKVKEq1ahODWpS
i9rUoS71qE8UDWhIIxrThKY0ozktaEkrWtOGtrQjmvZ0oCOd6EwXutKN7vSg
JzHE0ove9KEv/ejPAAYyiMEMYSjDGM4IRjKK0YxhLOMYzwQmMonJTGEq05jO
DGYyi9nMYS7zmM8CFrKIxcSxhKUsYzkrWMkqVrOGtaxjPRvYyCY2E+I7EpKU
UFKSnDBSEUk4bwCPDsX4
       "]], LineBox[CompressedData["
1:eJwV1lOUHgYQBtA/G+7GNjZ2k8Z229hWo8a20cZok8Zt0sa2bdu2bau3D/d8
D3O+eZtzJrRx+yrtwgQCgW5BgUCGyIHAokiBQEqZiNhEJZgILDZbwlKWsZwV
rGQVq1nDWtaxng1sZBOb2cJWtrGdHexkF7vZw172sZ8DHOQQhznCUY5xnBOc
5BSnOcNZznGeC1zkEpe5wlWucZ0b3OQWt7nDXe5xnwc85BGPecJTnvGcF7zk
Fa95w1ve8Z4PfOQTn/nCV74RCA4EwhBEWMIRnghEJBLBhBCZKEQlGtGJQUxi
EZs4xCUe8UlAQhKRmCQkJRnJSUEoKUlFatKQlnSkJwMZyURmspCV78hGdr4n
BznJRW7ykJd85KcABSlEYYpQlGIUpwQlKcUP/MhPlKYMZSlHeSpQkUpUpgpV
qUZ1alCTWtSmDnWpR30a0JCfaURjmtCUZvxCc1rQkla0pg1taUd7OtCRTnSm
C13pRnd60JNe9KYPfelHfwYwkEH8ym8MZghDGcZwRjCSUYxmDL/zB2MZx5+M
ZwITmcRkpjCVv/ibaUznH/5lBjOZxWzmMJd5zGcBC1nEYpawlGUsZwUrWcVq
1rCWdaxnAxvZxGa2sJVtbGcHO9nFbvawl33s5wAHOcRhjnCUYxznBCc5xWnO
cJZznOcCF7nEZa5wlWtc5wY3ucVt7nCXe9znAQ95xGOe8JRnPOcFL3nFa97w
lne85wMf+cRnvvCVbwRC3D9BhCUc4YlARCIRTAiRiUJUohGdGMQk1v9d62LL
OMQlHvFJQEISkZgkJCUZyUlBKClJRWrSkJZ0pCcDGclEZrKQle/IRna+Jwc5
yUVu8pCXfOSnAAUpRGGKUJRiFKcEJSnFD/zIT5SmDGUpR3kqUJFKVKYKValG
dWpQk1rUpg51qUd9GtCQn2lEY5rQlGb8QnNa0JJWtKYNbWlHezrQkU50pgtd
6UZ3etCTXvSmD33pR38GMJBB/MpvDGYIQxnGcEYwklGMZgy/8wdjGcefjGcC
E5nEZKYwlb/4m2lM5x/+ZQYzmcVs5jCXecxnAQtZxGKWsJRlLGcFK1nFataw
lnWsZwMb2cRmtrCVbWxnBzvZxW72sJd97OcABznEYY5wlGMc5wQnOcVpznCW
c5znAhe5xGWucJVrXOcGN7nFbe5wl3vc5wEPecRjnvCUZzznBS95xWve8JZ3
vOcDH/nEZ77wlW8E/FVhCCIViYlDNEKISGqSEJcYRCENSYlPLNKSnISkJ5SM
hOU/xOdhuA==
       "]]}, 
     {GrayLevel[0], LineBox[CompressedData["
1:eJwV1mMc3GYAwOHbuppbx65DsbVjbdtuV9u2bdtYbdurbRsza7t73g/P7//m
ktzl3iR3SVKnZdkWb0QikddRIpHhCSORNLEjkbSkIz0ZyEgmMpOFrGQjOznI
SS5yk4e85CM/BShIIQpThKIUozglKEkpSlOGspSjPBX4gYpUojJVqEo1qlOD
mtSiNnWoSz3q04CGNKIxTWhKM5rTgpa0ojVtaEs72tOBjnSiM13oSje604Oe
9KI3fehLP/ozgIEMYjBDGMowhjOCkYxiNGMYyzjGM4GJTGIyU5jKNH5kOjOY
ySxmM4e5zGM+C1jIIhazhKUsYzkrWMkqVrOGtaxjPRvYyCY2s4Wt/MQ2trOD
nexiN3v4OZ5jpAHZSExM9lr3i06nIdn5hFjss+5XnUEjcvApsbnPSjpTklTs
t/1vOpPG5OQz4vCAVXShFKk5YPvfdRZNyMXnvGYr/alCXB6ymq6UJg0H7f+H
zqYpuUlCJL750AFUJR6PWEM3yoTXbHNYx5GWqJZ36VBqkdDyCZ3MIZ/zp86h
GR9Yd0bzhLkwPqCjScoblrfpwDDHxhe1Gm8bH9OUOjHMi17RbzW+PmYtyS13
10R6Xr/Sshpfj2gKHR/Og17WbzSdRtPd+qUOC+dQL2lt3jU+qVPC/Bpf1cO+
0186l+Z86PWzmjecL+ODOoZkvGl5uw6iOgl4wjp6UI70RLfdHh1OHY74jL91
Hi3IF74fUWy3QwdTI8wNT1lPT8qTgaP2/0fn05L8fME7PGMDvahARo7Z/l9d
QCsKhPkI55Lj1v2nC2lNwTCXYW44Yd0NXUQbCoXzxHuctO4UpznDWc5xngtc
5BKXucJVrnE93HPh3gr3ULgvwrUertdwLYW5D3MTvl845nBs4Ri4yS1uc4e7
3OM+D3jIIx7zhKc84zkveMkrXhOJ43rkTaLwFlGJRnRiEJNYxCYOcYlHfBLw
Nu+QkHe5aU4W05bC4frkfZ6zkd78QKYwf7a/pUtoRxG+5i3nf6cOoWY4n5aP
66Rwb/GCTeFce72PfqwXwr5aMVx/elQnkJkYlvfqCOqG4/G5t3Up7Ska7pNw
jYf3t+5DPiIRH5OYT/iUz/icJCQlGcn5gi9JQUq+4mu+4Vu+43tSkZo0pCUd
6clARjKRmSxkJRvZyUFOcpGbPOQlH/kpQEEKUZgiFKUYxSlBSUpRmjKUpRzl
ueO7L6MDxcLvDh/xks30pRJZiGk+9+lI6oXzaPmUTiWJ8TX9Tit437vGy8Pv
hOWO4T31nBYnrvEhHRu2J1G4NuxTkUpUpgpVqUZ1alCTWtSmDnWpR30a0JBG
NKYJTWlGc1rQkla0pg1taUd7OtCRTnSmC13pRnd60JNe9KYPfelHfwYwkEEM
ZghDGcZwRjCSUYxmDGMZx3gmMJFJTGYKU5nGj0xnBjOZxWzmMJd5zGcBC1nE
YpawlGUsZwUrWcVq1rCWdaxnAxvZxGa2sJWf2MZ2drCTXexmD3vZx34OcJBD
HOYIRznGcU5wklOc5gxnOcd5LnCRS1zmCle5xnV+5hd+5Td+5w/+5C/+5h/+
5T9ucJNb3OYOd7nHfR7wkEc85glPecZzXvCSV7wmEtdvJ28ShbeISjSiE4OY
xCI2cYhLPOKTgLd5h4S8y3u8zwd8yEck4mMS8wmf8hmfk4SkJCM5X/AlKUjJ
V3zNN3zLd3xPKlKThrSkIz0ZyEgmMpOFrGQjOznISS5yk4e85CM/BShIIQpT
hKIUozglKEkpSlOGspSjPBX4gYpUojJVqEo1qlODmtSiNnWoSz3q04CGNKIx
TWhKM5rTgpa0ojVtaEs72tOBjnSiM13oSje604Oe9KI3fehLP/ozgIEMYjBD
GMowhjOCkYxiNGMYyzjGM4GJTGIyU5jKNH5kOjOYySxmM4e5zGM+C1jIIhaz
hKUsYzkrWMkqVrOGtaxjPRvYyCY2s4Wt/MQ2trODnexiN3vYyz72c4CDHOIw
RzjKMY5zgpOc4jRnOMs5znOBi1ziMle4yjWu8zO/8Cu/8Tt/8Cd/8Tf/8C//
cYOb3OI2d7jLPe7zgIc84jFPeMoznvOCl7ziNRH/VW+EZ9/wvBqeWYhKtPCc
yz1W0IkSfB+eU3jFFvpRmazE8j+4X0dRPzyfWD6t00hqfD3srzH0fyJ1M7s=

       "]]}, 
     {GrayLevel[0], LineBox[CompressedData["
1:eJwV13OYnUcbB+ANmqSN0aRtbLSxbduNbdu2bdu23ab92jS2bZvf/f5xX8/8
Zs7ZPTszz7neTdywXaW2oUJCQuqFDQkZGzMkJEPUkJCMZCIzWchKNrKTg5zk
Ijd5yEs+8lOAghSiMEUoSjGKU4KSlKI0ZShLOcpTgYpUojJVqEo1qvM7NahJ
LWpTh7rUoz4NaEgjGtOEpjSjOS1oSSta04a2tKM9HehIJzrTha50ozs96Ekv
etOHvvSjPwMYyCAGM4ShDGM4IxjJKEYzhrGMYzwTmMgkJjOFqUxjOjOYySxm
M4e5zGM+C1jIIhazhKUsYzkrWMkqVrOGtaxjPRvYyCY2s4WtbGM7O9jJLnaz
h73sYz8HOMghDnOEP/iTo/zF3/yPf/iXY/zHcU5wklOc5gxnOcd5LnCRS1zm
Cle5xnVucJNb3OYOd7nHfR7wkEc85glPecZzXvCSV7zmDW95x3s+8JFPfOYL
X/lGSLSQkFCEJgxh+Y5whCcC3/MDEYlEZKIQlWhEJwYxicWPxCYOVfVoCkK4
GcMesodGchai8Fy+wE9eX01OSShumeukFiEBfanAP+Zbq3kZQhx6U44P1rqq
JUjCXrmxmpWovJAv8rPfVV1ORWhum/uXffxiLS7xiE8CEpKIxCQhKclITgpS
korUpOFXfiMt6UhPBjKSicxkISvZyE4OcpKL3OQhL/nITwEKUojCFKEoxShO
CUpSitKUoSzlKE8FKlKJylQJzifY82Av+J0a1KQWtalDXepRnwY0pFFwZxxr
GBobN6EpzWhOC1rSita0oS3taE8HOtKJznShK93oTg960ove9KEv/ejPAAYy
iMEMYSjDGM4IRjKK0YxhLOMYzwQmMonJTGEq05jODGYyi9nMYS7zmM8CFrKI
xSxhKctYzgpWsorVrGEt61jPBjayic1sYSvb2M4OdrKL3exhL/vYzwEOcojD
HOEP/uQof/E3/+Mf/uUY/3GcE5zkFKc5w1nOcZ4LXOQSl7nCVa5xnRvc5Ba3
ucNd7nGfBzzkEY95wlOe8ZwXvOQVr3nDW97xng985BOf+cJXvhES3fcDoQlD
WL4jHOGJwO96OjVhuKOnj7GfJnI2ovFSvkQ74wL8wme5u1qKZAygMiP43s+t
oaZhEGHpSRnuet9/HOAHr4tIJCIThahEIzoxiEksfiQ2cfiJn/mFuMQjPglI
SCISk4SkJCM5KUhJKlKThl/5jbSkIz0ZyEgmMpOFrGQjOznISS5yk4e85CM/
BShIIQpThKIUozglKEkpSlOGspSjPBWoSCUqU4WqVKN6cGbB/lKTWtSmDnWp
R30a0JBGNKYJTWlGc1rQkla0pg1taUd7OtCRTnSmC13pRnd60JNe9KYPfelH
fwYwkEEMZghDGcZwRjCSUYxmDGMZx3gmMJFJTGYKU5nGdGYwk1nMZg5zmcd8
FrCQRSxmCUtZxnJWsJJVrGYNa1nHejawkU1sZgtb2cZ2drCTXexmD3vZx34O
cJBDHOZIcF7u/698xz33/zgH+SM4R3O/EY775k5wiD+D8zWXlvA8MHeSwzSV
sxOdV/JljgZ3QU5HBB6aO8URmsk5iMFr+Qp/BfdGTh/0LY/MnQ4+E83lnMTk
jXyVv4M7Fvw/wQ88NneGNsb5+ImPweemhXEuYvFW7qIWIxHX5PZqQeLyJXjm
Ce6ucUYi8sRcZ7UoCTkrt1Xz8zN9KM8n893UkgwlKf2pxFFrLdXcDOZHelGW
YbyzXlxNTL/gbHxtVlSHc91aB7UQ8fgq/xP0lnEmIvHU3LlgH4PnImvH+I/j
nOAkpzjNGc5yjvNc4CKXuMwVrnKN69zgJre4zR3uco/7POAhj3jME57yjOe8
4CWveM0b3vKO93zgI5/4zBe+8o0Qf08oQhOGsHxHOMITge+D73AiEonIRCEq
0YhODGISix+JTZzgGTZ4tgyeIYlLPOKTgIQkIjFJSEoykpOClKQiNWn4ld9I
SzrSk4GMZCIzWchKNrKTg5zkIjd5yEs+8lOAghSiMEUoSrHgvlCCkpSiNGUo
SznKU4GKVKIyVahKNarzOzWoSS1qU4e61KM+DWhIIxrThKZBHwe9GfRXcLdp
ReugB4P+oF3QW8HdpSOdgj6iC12DXqE7PehJL3rTh770oz8DGMggBjOEoQxj
OCMYyShGM4axjGM8E5jIJCYzhalMYzozmMksZjOHucxjPgtYyCIWs4SlLGM5
K1jJKlazhrWsYz0b2MgmNrOFrWxjOzvYya5gn/VyZiLzTD7P38HeynmIzXv5
RrCnxoWJz7dgH9XSJGcgVRjJbmv/B3Q1a3A=
       "]]}, 
     {GrayLevel[0.5], LineBox[{840, 841, 839}], LineBox[{1818, 1819, 1817}], 
      LineBox[{2862, 2863, 2861}]}}, {{}, {}, {}, {}, {}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["K", TraditionalForm], 
    FormBox["\[CapitalDelta]", TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{"AxesInFront" -> True},
  PlotRange->{{0.001, 1}, {0, 0.7}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], Automatic}]], "Output",
 CellChangeTimes->{
  3.7328885269726667`*^9, 3.73288872909759*^9, 3.73288878327487*^9, {
   3.732888821303405*^9, 3.7328889239464445`*^9}, {3.7328889560217104`*^9, 
   3.732888971547852*^9}, 3.732889064495165*^9, {3.7328892366674757`*^9, 
   3.732889304903618*^9}, 3.732889340837726*^9, 3.7328893816895704`*^9, {
   3.7328894931419377`*^9, 3.732889535859518*^9}, 3.73288959246824*^9, {
   3.73288971695761*^9, 3.7328897521205053`*^9}, 3.7344381669209747`*^9, 
   3.7344413687225356`*^9, 3.740381461500539*^9, 3.7405753224575777`*^9, {
   3.740575357591031*^9, 3.7405753673209205`*^9}, 3.7406768368381834`*^9, 
   3.7407226784687777`*^9, 3.740722733929262*^9, 3.7407227990746045`*^9, 
   3.74074111178494*^9, 3.740801335707117*^9, {3.7408109996696887`*^9, 
   3.740811007201753*^9}, 3.740811043269839*^9}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["\<\
Product differentiation and Figure 3\
\>", "Section",
 CellChangeTimes->{{3.6609772427701063`*^9, 3.660977245635023*^9}, {
   3.6953576318725967`*^9, 3.6953576323561993`*^9}, 3.7235333374468145`*^9, {
   3.7242473342897243`*^9, 3.7242473377307477`*^9}, {3.724247390075876*^9, 
   3.7242474036244593`*^9}, {3.7265552161009912`*^9, 
   3.7265552298439913`*^9}, {3.732889799276472*^9, 3.732889806527178*^9}, 
   3.7328898472823796`*^9, {3.7405754741090746`*^9, 3.7405754830549192`*^9}, {
   3.7406403195062027`*^9, 3.740640323315373*^9}, 3.740643969693086*^9}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
   "As", " ", "in", " ", "the", " ", "main", " ", "text", " ", "we", " ", 
    "study", " ", "here", " ", "the", " ", "case", " ", "of", " ", "k"}], "=", 
   RowBox[{
    RowBox[{
     RowBox[{"1", "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}], " ", "so", " ", "that", " ", 
       "constraint", " ", 
       RowBox[{"(", "2", ")"}], " ", "q2"}]}], "\[LessEqual]", 
     RowBox[{"K", " ", "does", " ", "not", " ", "bind", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
        "and", " ", "hence", " ", "the", " ", "equilibrium", " ", "with", " ",
          "non", " ", "exclusive", " ", "is", " ", "in", " ", "pure", " ", 
         "strategies"}], ")"}], ".", "\[IndentingNewLine]", "The"}], " ", 
      "equilibrium", " ", "wth", " ", "exclusive", " ", "is", " ", "either", 
      " ", "the", " ", "monopoly", " ", "price", " ", "p1m", " ", "or", " ", 
      "the", " ", "price", " ", "p1Eequcorn", " ", "which", " ", "for", " ", 
      "k"}]}], "=", 
    RowBox[{"1", "-", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"c", "+", "d"}], ")"}], " ", "values", " ", "c"}], "+", 
     RowBox[{"d", " ", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"see", " ", "below"}], ")"}], ".", " ", "We"}], " ", "will", 
      " ", "not", " ", "consider", " ", "the", " ", "case", " ", "of", " ", 
      "the", " ", "monopoly", " ", "price", " ", "because", " ", "we", " ", 
      "know", " ", "that", " ", "in", " ", "this", " ", "case", " ", 
      "exclusive", " ", "dealing", " ", "is", " ", "always", " ", 
      "anticompetitive", " ", "and", " ", "a", " ", "test", " ", "would", " ",
       "be", " ", 
      RowBox[{"needed", ".", "\[IndentingNewLine]", "The"}], " ", "condition",
       " ", "fo", " ", "rhte", " ", "monopoly", " ", "price", " ", "to", " ", 
      "prevail", " ", "is", " ", "thus", " ", "as", " ", 
      RowBox[{"follows", "."}]}]}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.726555440842391*^9, 3.726555457434191*^9}, {
  3.7328902071399665`*^9, 3.7328902186991463`*^9}, {3.732897252537464*^9, 
  3.732897277421077*^9}, {3.7407299378063865`*^9, 3.7407300604942603`*^9}, {
  3.740730275533104*^9, 3.7407303955874915`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   RowBox[{"p1Eequcorn", "/.", 
    RowBox[{"k", "\[Rule]", 
     RowBox[{"1", "-", 
      RowBox[{"(", 
       RowBox[{"c", "+", "d"}], ")"}]}]}]}], ",", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "1"}], "+", "c", "+", "d"}], "<", "0"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.7407300619090595`*^9, 3.7407301226977105`*^9}, {
  3.7407302587915077`*^9, 3.7407302677307615`*^9}}],

Cell[BoxData[
 RowBox[{"c", "+", "d"}]], "Output",
 CellChangeTimes->{{3.7407300828130455`*^9, 3.740730123238412*^9}, {
   3.740730263039138*^9, 3.7407302682077045`*^9}, 3.7407411131632533`*^9, 
   3.740801336352801*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{"F1m", "/.", 
    RowBox[{"k", "\[Rule]", 
     RowBox[{"1", "-", 
      RowBox[{"(", 
       RowBox[{"c", "+", "d"}], ")"}]}]}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"dmon", "=", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"%", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}]}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ContourPlot", "[", 
    RowBox[{"%%", ",", 
     RowBox[{"{", 
      RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"Contours", "\[Rule]", 
      RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"c", ",", "0.0"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Mu]", ",", "10"}], "}"}], ",", "0", ",", "15"}], "}"}]}], 
  "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", 
 RowBox[{"N", "[", 
  RowBox[{"%%", "/.", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"\[Mu]", "\[Rule]", "15"}], ",", 
     RowBox[{"c", "\[Rule]", "0"}]}], "}"}]}], 
  "]"}], "\[IndentingNewLine]"}], "Input",
 CellChangeTimes->{{3.7407238265191836`*^9, 3.740723872847492*^9}, {
  3.7407306406258802`*^9, 3.740730706854495*^9}, {3.7407307753870134`*^9, 
  3.7407307996415815`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"d", "\[Rule]", 
     RowBox[{"-", 
      FractionBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "c"}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{"2", "+", 
          RowBox[{"3", " ", "\[Mu]"}]}], ")"}]}], 
       RowBox[{"1", "+", 
        RowBox[{"2", " ", "\[Mu]"}]}]]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"d", "\[Rule]", 
     FractionBox[
      RowBox[{"\[Mu]", "-", 
       RowBox[{"c", " ", "\[Mu]"}]}], 
      RowBox[{"1", "+", 
       RowBox[{"2", " ", "\[Mu]"}]}]]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.7407238435284348`*^9, 3.740723858986568*^9}, 
   3.740730661339573*^9, {3.7407306932946978`*^9, 3.7407307072930536`*^9}, {
   3.7407307911733713`*^9, 3.740730800488327*^9}, 3.7407411137533216`*^9, 
   3.740801336881205*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0., $CellContext`\[Mu]$$ = 10, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`c$$], 0.}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 10}, 0, 15}}, Typeset`size$$ = {
    720., {348., 369.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$265540$$ = 
    0, $CellContext`\[Mu]$265541$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0., $CellContext`\[Mu]$$ = 10}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$265540$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$265541$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[
       Rational[
         1, 2] (1 + $CellContext`\[Mu]$$)^(-1) (-(-1 + $CellContext`c$$ + \
$CellContext`d)^2 + (-1 + $CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
            2 $CellContext`\[Mu]$$)^(-2)), {$CellContext`\[Gamma], 0, 
         1}, {$CellContext`d, 0, 1}, Contours -> {0}], 
      "Specifications" :> {{{$CellContext`c$$, 0.}, 0, 
         1}, {{$CellContext`\[Mu]$$, 10}, 0, 15}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {469., 480.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.7407238435284348`*^9, 3.740723858986568*^9}, 
   3.740730661339573*^9, {3.7407306932946978`*^9, 3.7407307072930536`*^9}, {
   3.7407307911733713`*^9, 3.740730800488327*^9}, 3.7407411137533216`*^9, 
   3.7408013368912315`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"d", "\[Rule]", "1.5161290322580645`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"d", "\[Rule]", "0.4838709677419355`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.7407238435284348`*^9, 3.740723858986568*^9}, 
   3.740730661339573*^9, {3.7407306932946978`*^9, 3.7407307072930536`*^9}, {
   3.7407307911733713`*^9, 3.740730800488327*^9}, 3.7407411137533216`*^9, 
   3.740801336892234*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Since", " ", "we", " ", "will", " ", "consider", " ", "the", " ", "case",
      " ", "of", " ", "c", " ", "small", " ", 
     RowBox[{"(", 
      RowBox[{"c", "=", "0"}], ")"}], " ", "the", " ", "relevant", " ", 
     "constraint", " ", "is", " ", "the", " ", 
     RowBox[{"second", ":", " ", 
      RowBox[{
      "for", " ", "the", " ", "constrained", " ", "price", " ", "to", " ", 
       "apply", " ", "wth", " ", "exclusivity"}]}]}], ",", " ", 
    RowBox[{
    "d", " ", "must", " ", "be", " ", "smaller", " ", "than", " ", "the", " ",
      "folowing"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"dmon", "[", 
   RowBox[{"[", 
    RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.7407307429225893`*^9, 3.7407307629980993`*^9}, {
  3.7407308072847867`*^9, 3.7407308496371126`*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{"\[Mu]", "-", 
   RowBox[{"c", " ", "\[Mu]"}]}], 
  RowBox[{"1", "+", 
   RowBox[{"2", " ", "\[Mu]"}]}]]], "Output",
 CellChangeTimes->{3.7407308141575985`*^9, 3.7407411138490143`*^9, 
  3.740801336942368*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"{", 
   RowBox[{
    RowBox[{"dmon", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1", "-", "c"}], ")"}], 
     RowBox[{"(", 
      RowBox[{"1", "-", "\[Gamma]"}], ")"}]}]}], "}"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{"%", ",", 
     RowBox[{"{", 
      RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "1"}], "}"}]}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"c", ",", "0.0"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Mu]", ",", "15"}], "}"}], ",", "0", ",", "20"}], "}"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.740723941269553*^9, 3.740723979475212*^9}, {
  3.7407240606140747`*^9, 3.7407241068049746`*^9}, {3.740724342561286*^9, 
  3.7407243573035135`*^9}, {3.7407305095668406`*^9, 3.7407305571389866`*^9}, {
  3.740730856804777*^9, 3.740730881562331*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0., $CellContext`\[Mu]$$ = 15, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`c$$], 0.}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 15}, 0, 20}}, Typeset`size$$ = {
    720., {226., 248.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$265560$$ = 
    0, $CellContext`\[Mu]$265561$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0., $CellContext`\[Mu]$$ = 15}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$265560$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$265561$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{(1 + 
           2 $CellContext`\[Mu]$$)^(-1) ($CellContext`\[Mu]$$ - \
$CellContext`c$$ $CellContext`\[Mu]$$), (1 - $CellContext`c$$) (
          1 - $CellContext`\[Gamma])}, {$CellContext`\[Gamma], 0, 1}, 
        PlotRange -> {0, 1}], 
      "Specifications" :> {{{$CellContext`c$$, 0.}, 0, 
         1}, {{$CellContext`\[Mu]$$, 15}, 0, 20}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {347., 358.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.7407239800737953`*^9, {3.740724081687145*^9, 3.7407241075028315`*^9}, {
   3.7407243431408625`*^9, 3.740724358089612*^9}, 3.7407244841420155`*^9, 
   3.7407245537823205`*^9, {3.7407305460154605`*^9, 3.740730557489871*^9}, {
   3.740730857445046*^9, 3.7407308820648794`*^9}, 3.740741113926982*^9, 
   3.740801336998517*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "The", " ", "admissibility", " ", "is", " ", "below", " ", "red", " ", 
   "and", " ", 
   RowBox[{"blue", "."}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7407241463522053`*^9, 3.740724229680973*^9}, {
  3.740724380071101*^9, 3.740724406349058*^9}, {3.740724564134902*^9, 
  3.7407247131594343`*^9}, {3.740724753892823*^9, 3.740724757547536*^9}, {
  3.740730898083062*^9, 3.740730912602563*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "test", " ", "is", " ", "passed", " ", "if", " ", "the", " ", 
    "folowing", " ", "expression", " ", "is", " ", 
    RowBox[{"positive", " ", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"D", "[", 
        RowBox[{"v", ",", "q2"}], "]"}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q2", "\[Rule]", "0"}], ",", 
         RowBox[{"q1", "\[Rule]", "q1e"}]}], "}"}]}], "/.", 
      RowBox[{"p1", "\[Rule]", "p1Eequcorn"}]}], "/.", 
     RowBox[{"k", "\[Rule]", 
      RowBox[{"1", "-", 
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}]}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"2", "*", 
       RowBox[{"(", "p1Eequcorn", ")"}]}], "-", 
      RowBox[{"(", 
       RowBox[{"%", "+", "c"}], ")"}]}], "/.", 
     RowBox[{"k", "\[Rule]", 
      RowBox[{"1", "-", 
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}]}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", "%", "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"c", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}]}], 
    "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dTestLocalp1Econstr", "=", 
     RowBox[{
      RowBox[{"FullSimplify", "[", 
       RowBox[{"Solve", "[", 
        RowBox[{
         RowBox[{"%%", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"dTestLocalp1Econstr", "/.", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"c", "\[Rule]", "0"}], ",", 
      RowBox[{"\[Mu]", "\[Rule]", "15"}], ",", 
      RowBox[{"\[Gamma]", "\[Rule]", "0.5"}]}], "}"}]}]}]}]], "Input",
 CellChangeTimes->{
  3.7265603985927916`*^9, {3.7265604311327915`*^9, 3.726560447142391*^9}, {
   3.732898717048584*^9, 3.7328987433188066`*^9}, {3.7328988364914455`*^9, 
   3.7328988510168543`*^9}, {3.740641730766644*^9, 3.7406417466018257`*^9}, 
   3.7406418033698764`*^9, {3.7406430884703217`*^9, 3.740643131825653*^9}, {
   3.740667921254341*^9, 3.7406679399340057`*^9}, {3.7407310448652315`*^9, 
   3.7407311185865927`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`c$$], 0.5}, 0, 1}}, Typeset`size$$ = {
    720., {348., 369.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$265730$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`c$$ = 0.5}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$265730$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[
       1 - $CellContext`c$$ - 
        2 ((-1 + $CellContext`c$$ + $CellContext`d)^2)^
         Rational[1, 2] + ((-1 + $CellContext`c$$ + $CellContext`d)^2)^
          Rational[1, 2] $CellContext`\[Gamma], {$CellContext`\[Gamma], 0, 
         1}, {$CellContext`d, 0, 1}, Contours -> {0}], 
      "Specifications" :> {{{$CellContext`c$$, 0.5}, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {441., 452.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.726560438279591*^9, 3.726560448374791*^9}, 
   3.7328987446385436`*^9, {3.7328988414985266`*^9, 3.732898852098196*^9}, 
   3.734438170594773*^9, 3.734441371923006*^9, 3.7406417611865854`*^9, 
   3.7406418042090654`*^9, {3.740667924148029*^9, 3.7406679406068344`*^9}, 
   3.740731073639877*^9, 3.7407311193929443`*^9, 3.740741114120163*^9, 
   3.740801337174987*^9}],

Cell[BoxData["0.3333333333333333`"], "Output",
 CellChangeTimes->{{3.726560438279591*^9, 3.726560448374791*^9}, 
   3.7328987446385436`*^9, {3.7328988414985266`*^9, 3.732898852098196*^9}, 
   3.734438170594773*^9, 3.734441371923006*^9, 3.7406417611865854`*^9, 
   3.7406418042090654`*^9, {3.740667924148029*^9, 3.7406679406068344`*^9}, 
   3.740731073639877*^9, 3.7407311193929443`*^9, 3.740741114120163*^9, 
   3.740801337204064*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"As", " ", "for", " ", "the", " ", "welfare", " ", "effects"}], 
    ",", " ", 
    RowBox[{
    "welfare", " ", "incresaes", " ", "in", " ", "the", " ", "white", " ", 
     RowBox[{"area", "."}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"v", "-", 
        RowBox[{"q1", "*", "p1"}], "-", 
        RowBox[{"q2", "*", "p2"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
         RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
        RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"ve1", "-", 
         RowBox[{"q1", "*", "p1"}]}], "/.", 
        RowBox[{"q1", "\[Rule]", "q1e"}]}], "/.", 
       RowBox[{"p1", "\[Rule]", "p1Eequcorn"}]}], "/.", 
      RowBox[{"k", "\[Rule]", 
       RowBox[{"1", "-", 
        RowBox[{"(", 
         RowBox[{"c", "+", "d"}], ")"}]}]}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{
       RowBox[{"%", "-", "%%"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "5"}], "}"}], ",", "0", ",", "10"}], "}"}]}], 
    "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dwelfarep1ECorner", "=", 
     RowBox[{
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"%%", "\[Equal]", "%%%"}], ",", "d"}], "]"}], "[", 
      RowBox[{"[", 
       RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"dwelfarep1ECorner", "/.", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"c", "\[Rule]", "0"}], ",", 
      RowBox[{"\[Mu]", "\[Rule]", "15"}], ",", 
      RowBox[{"\[Gamma]", "\[Rule]", "0.5"}]}], "}"}]}]}]}]], "Input",
 CellChangeTimes->{{3.726558104129591*^9, 3.726558114332991*^9}, {
  3.732897616928803*^9, 3.7328976558441463`*^9}, {3.740641377957875*^9, 
  3.7406415089925356`*^9}, {3.7406415455327654`*^9, 3.740641559352538*^9}, {
  3.740641609375676*^9, 3.7406416108024464`*^9}, {3.7406418543655457`*^9, 
  3.7406419202779503`*^9}, {3.740641993035509*^9, 3.740642066006702*^9}, {
  3.740642098909216*^9, 3.7406421379230256`*^9}, {3.7406421730966177`*^9, 
  3.7406421788729877`*^9}, {3.740642620085988*^9, 3.7406426285585327`*^9}, {
  3.740642664327709*^9, 3.7406426850067773`*^9}, {3.7406431061273155`*^9, 
  3.740643140713298*^9}, {3.7407311342120285`*^9, 3.740731168005619*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Mu]$$ = 5, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 5}, 0, 10}}, Typeset`size$$ = {
    720., {348., 369.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$268281$$ = 
    0, $CellContext`\[Mu]$268282$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Mu]$$ = 5}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$268281$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$268282$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[
       Rational[1, 2] (-1 + $CellContext`c$$ + $CellContext`d)^2 - 
        Rational[
         1, 2] (-1 + $CellContext`\[Gamma]^2)^(-1) (
          1 + $CellContext`\[Mu]$$)^2 (-1 + (-2 + $CellContext`\[Gamma]) \
$CellContext`\[Mu]$$)^(-2) (
          1 + (2 + $CellContext`\[Gamma]) $CellContext`\[Mu]$$)^(-2) (
         2 (-1 + $CellContext`\[Gamma]) (
            1 + (2 + $CellContext`\[Gamma]) $CellContext`\[Mu]$$)^2 + 
         2 $CellContext`c$$ (-2 + $CellContext`d) (-1 + \
$CellContext`\[Gamma]) (
            1 + (2 + $CellContext`\[Gamma]) $CellContext`\[Mu]$$)^2 - 
         2 $CellContext`d (-1 + $CellContext`\[Gamma]) (
           1 + (2 + $CellContext`\[Gamma]) $CellContext`\[Mu]$$)^2 + 
         2 (-1 + $CellContext`\[Gamma]) ($CellContext`c$$ + $CellContext`c$$ (
              2 + $CellContext`\[Gamma]) $CellContext`\[Mu]$$)^2 + \
$CellContext`d^2 (-1 + $CellContext`\[Mu]$$ ((-4) (
               1 + $CellContext`\[Mu]$$) + $CellContext`\[Gamma]^2 (2 + 
               3 $CellContext`\[Mu]$$)))), {$CellContext`\[Gamma], 0, 
         1}, {$CellContext`d, 0, 1}, Contours -> {0}], 
      "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Mu]$$, 5}, 0, 10}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {469., 480.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.7265581044571915`*^9, 3.726558114785391*^9}, {
   3.732897634730281*^9, 3.7328976576181974`*^9}, 3.734438167394232*^9, 
   3.734441369145625*^9, 3.740641489672171*^9, {3.7406415265281973`*^9, 
   3.740641560951792*^9}, {3.740641848244233*^9, 3.740641881743371*^9}, 
   3.740641922725416*^9, {3.7406420019562707`*^9, 3.7406420302655745`*^9}, 
   3.7406420674465423`*^9, {3.7406421001826363`*^9, 3.740642139152295*^9}, {
   3.7407311452739544`*^9, 3.7407311692359905`*^9}, 3.740741115383211*^9, 
   3.7408013384182935`*^9}],

Cell[BoxData["0.3290971872875246`"], "Output",
 CellChangeTimes->{{3.7265581044571915`*^9, 3.726558114785391*^9}, {
   3.732897634730281*^9, 3.7328976576181974`*^9}, 3.734438167394232*^9, 
   3.734441369145625*^9, 3.740641489672171*^9, {3.7406415265281973`*^9, 
   3.740641560951792*^9}, {3.740641848244233*^9, 3.740641881743371*^9}, 
   3.740641922725416*^9, {3.7406420019562707`*^9, 3.7406420302655745`*^9}, 
   3.7406420674465423`*^9, {3.7406421001826363`*^9, 3.740642139152295*^9}, {
   3.7407311452739544`*^9, 3.7407311692359905`*^9}, 3.740741115383211*^9, 
   3.7408013385396166`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Analysis", " ", "of", " ", "Figure", " ", "3"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
     "dwelfarep1ECorner", ",", "\[IndentingNewLine]", "dTestLocalp1Econstr", 
      ",", "\[IndentingNewLine]", 
      RowBox[{"Min", "[", 
       RowBox[{"dwelfarep1ECorner", ",", "dTestLocalp1Econstr"}], "]"}], ",", 
      "\[IndentingNewLine]", 
      RowBox[{"Max", "[", 
       RowBox[{"dwelfarep1ECorner", ",", "dTestLocalp1Econstr"}], "]"}], ",", 
      RowBox[{"dmon", "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", "c"}], ")"}], 
       RowBox[{"(", 
        RowBox[{"1", "-", "\[Gamma]"}], ")"}]}]}], "\[IndentingNewLine]", 
     "}"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "0.6"}], "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Gamma]\>\"", ",", "\"\<\[CapitalDelta]\>\""}], 
         "}"}]}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Black"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Black", ",", "Thin"}], "}"}], ",", 
          RowBox[{"{", "Black", "}"}], ",", 
          RowBox[{"{", "Black", "}"}], ",", 
          RowBox[{"{", "Green", "}"}], ",", 
          RowBox[{"{", "Green", "}"}]}], "}"}]}], ",", 
       RowBox[{"Filling", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"4", "\[Rule]", "1"}], ",", 
          RowBox[{"3", "\[Rule]", "Axis"}]}], "}"}]}], ",", 
       RowBox[{"FillingStyle", "\[Rule]", 
        RowBox[{"{", "Gray", "}"}]}], ",", 
       RowBox[{"PlotPoints", "\[Rule]", "1000"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "15"}], "}"}], ",", "0", ",", "25"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.740642214201993*^9, 3.740642242092238*^9}, {
   3.7406422895114126`*^9, 3.7406422923048134`*^9}, {3.740642341901782*^9, 
   3.740642343814871*^9}, 3.7406423845953836`*^9, {3.7406427515558405`*^9, 
   3.740642849873418*^9}, {3.740642886810708*^9, 3.7406429047063255`*^9}, {
   3.740642939291345*^9, 3.7406429612156825`*^9}, {3.7406429957756405`*^9, 
   3.7406430039433746`*^9}, {3.7406432258969593`*^9, 
   3.7406438444197607`*^9}, {3.7406689410545216`*^9, 
   3.7406689487821107`*^9}, {3.7407312065988865`*^9, 
   3.7407313563495917`*^9}, {3.7407314105261993`*^9, 3.740731411418686*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Mu]$$ = 1.5, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 15}, 0, 25}}, Typeset`size$$ = {
    720., {229., 250.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$268307$$ = 
    0, $CellContext`\[Mu]$268308$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Mu]$$ = 15}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$268307$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$268308$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{Rational[
          1, 2] ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
           6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           11 $CellContext`\[Mu]$$^2 + 
           19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
           20 $CellContext`\[Mu]$$^3 + 
           32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
           12 $CellContext`\[Mu]$$^4 + 
           21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4)^(-1) ((-2) $CellContext`\[Gamma] + 
          2 $CellContext`c$$ $CellContext`\[Gamma] + 
          2 $CellContext`\[Gamma]^2 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]^2 - 4 $CellContext`\[Mu]$$ + 
          4 $CellContext`c$$ $CellContext`\[Mu]$$ - 
          8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
          8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
          12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
          12 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
          22 $CellContext`\[Mu]$$^2 + 
          22 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
          10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
          10 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
          38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
          38 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
          2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
          2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
          4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
          4 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
          40 $CellContext`\[Mu]$$^3 + 
          40 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
          4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
          4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
          64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
          64 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
          4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
          4 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
          16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
          16 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
          24 $CellContext`\[Mu]$$^4 + 
          24 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
          42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
          42 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
          18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
          18 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + \
((2 $CellContext`\[Gamma] - 2 $CellContext`c$$ $CellContext`\[Gamma] - 
              2 $CellContext`\[Gamma]^2 + 
              2 $CellContext`c$$ $CellContext`\[Gamma]^2 + 
              4 $CellContext`\[Mu]$$ - 
              4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
              12 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 22 $CellContext`\[Mu]$$^2 - 
              22 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
              10 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 + 
              38 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 + 4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
              4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 + 40 $CellContext`\[Mu]$$^3 - 
              40 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
              4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 + 
              64 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
              16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Mu]$$^4 - 
              24 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 + 
              42 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 + 18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 - 
              
              18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + 
              2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4)^2 - 
            4 ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
             6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
             11 $CellContext`\[Mu]$$^2 + 
             19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
             2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
             20 $CellContext`\[Mu]$$^3 + 
             32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
             8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
             12 $CellContext`\[Mu]$$^4 + 
             21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
             9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4) (1 - 
             2 $CellContext`c$$ + $CellContext`c$$^2 - 
             2 $CellContext`\[Gamma] + 
             4 $CellContext`c$$ $CellContext`\[Gamma] - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma] + $CellContext`\
\[Gamma]^2 - 
             2 $CellContext`c$$ $CellContext`\[Gamma]^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]^2 + 4 $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$ $CellContext`\[Mu]$$ + 
             4 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
             8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
             16 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$^2 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
             4 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 2 $CellContext`\[Mu]$$^2 - 
             4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
             2 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
             10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
             20 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
             10 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
             24 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 
             12 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 8 $CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
             8 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
             4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
             8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
             4 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
             48 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 
             24 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
             8 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 
             8 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
             8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
             18 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
             36 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 
             18 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
             
             18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 
             9 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 + $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
             2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4 + $CellContext`c$$^2 $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4))^
           Rational[
            1, 2]), (-2 + $CellContext`\[Gamma])^(-1) (-1 + $CellContext`c$$ + \
$CellContext`\[Gamma] - $CellContext`c$$ $CellContext`\[Gamma]), 
         Min[(-2 + $CellContext`\[Gamma])^(-1) (-1 + $CellContext`c$$ + \
$CellContext`\[Gamma] - $CellContext`c$$ $CellContext`\[Gamma]), 
          Rational[
           1, 2] ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
            6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
            11 $CellContext`\[Mu]$$^2 + 
            19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
            2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
            20 $CellContext`\[Mu]$$^3 + 
            32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
            8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
            12 $CellContext`\[Mu]$$^4 + 
            21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
            9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4)^(-1) ((-2) $CellContext`\[Gamma] + 
           2 $CellContext`c$$ $CellContext`\[Gamma] + 
           2 $CellContext`\[Gamma]^2 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^2 - 
           4 $CellContext`\[Mu]$$ + 4 $CellContext`c$$ $CellContext`\[Mu]$$ - 
           8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           12 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           22 $CellContext`\[Mu]$$^2 + 
           22 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
           10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           10 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           38 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
           4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
           40 $CellContext`\[Mu]$$^3 + 
           40 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           64 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
           16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
           16 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
           24 $CellContext`\[Mu]$$^4 + 
           24 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
           42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           42 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
           18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           18 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + \
((2 $CellContext`\[Gamma] - 2 $CellContext`c$$ $CellContext`\[Gamma] - 
               2 $CellContext`\[Gamma]^2 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^2 + 
               4 $CellContext`\[Mu]$$ - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
               8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 22 $CellContext`\[Mu]$$^2 - 
               22 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
               10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
               10 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 + 
               38 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 + 4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 + 40 $CellContext`\[Mu]$$^3 - 
               40 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
               4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 - 64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 + 
               64 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
               16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Mu]$$^4 - 
               24 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
               42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 + 
               42 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 + 18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4)^2 - 
             4 ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
              6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              11 $CellContext`\[Mu]$$^2 + 
              19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
              20 $CellContext`\[Mu]$$^3 + 
              32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
              12 $CellContext`\[Mu]$$^4 + 
              21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4) (1 - 
              2 $CellContext`c$$ + $CellContext`c$$^2 - 
              2 $CellContext`\[Gamma] + 
              4 $CellContext`c$$ $CellContext`\[Gamma] - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma] + $CellContext`\
\[Gamma]^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]^2 + 4 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              16 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              4 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 2 $CellContext`\[Mu]$$^2 - 
              4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              2 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
              10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
              20 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 
              10 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              24 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 
              12 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 8 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
              4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              48 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 
              24 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              36 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 
              9 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 + $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4 + $CellContext`c$$^2 $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])], 
         Max[(-2 + $CellContext`\[Gamma])^(-1) (-1 + $CellContext`c$$ + \
$CellContext`\[Gamma] - $CellContext`c$$ $CellContext`\[Gamma]), 
          Rational[
           1, 2] ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
            6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
            11 $CellContext`\[Mu]$$^2 + 
            19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
            2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
            20 $CellContext`\[Mu]$$^3 + 
            32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
            8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
            12 $CellContext`\[Mu]$$^4 + 
            21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
            9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4)^(-1) ((-2) $CellContext`\[Gamma] + 
           2 $CellContext`c$$ $CellContext`\[Gamma] + 
           2 $CellContext`\[Gamma]^2 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^2 - 
           4 $CellContext`\[Mu]$$ + 4 $CellContext`c$$ $CellContext`\[Mu]$$ - 
           8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           12 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           22 $CellContext`\[Mu]$$^2 + 
           22 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
           10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           10 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           38 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
           4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
           40 $CellContext`\[Mu]$$^3 + 
           40 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           64 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
           16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
           16 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
           24 $CellContext`\[Mu]$$^4 + 
           24 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
           42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           42 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
           18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           18 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + \
((2 $CellContext`\[Gamma] - 2 $CellContext`c$$ $CellContext`\[Gamma] - 
               2 $CellContext`\[Gamma]^2 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^2 + 
               4 $CellContext`\[Mu]$$ - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
               8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 22 $CellContext`\[Mu]$$^2 - 
               22 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
               10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
               10 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 + 
               38 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 + 4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 + 40 $CellContext`\[Mu]$$^3 - 
               40 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
               4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 - 64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 + 
               64 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
               16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Mu]$$^4 - 
               24 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
               42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 + 
               42 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 + 18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4)^2 - 
             4 ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
              6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              11 $CellContext`\[Mu]$$^2 + 
              19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
              20 $CellContext`\[Mu]$$^3 + 
              32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
              12 $CellContext`\[Mu]$$^4 + 
              21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4) (1 - 
              2 $CellContext`c$$ + $CellContext`c$$^2 - 
              2 $CellContext`\[Gamma] + 
              4 $CellContext`c$$ $CellContext`\[Gamma] - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma] + $CellContext`\
\[Gamma]^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]^2 + 4 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              16 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              4 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 2 $CellContext`\[Mu]$$^2 - 
              4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              2 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
              10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
              20 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 
              10 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              24 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 
              12 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 8 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
              4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              48 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 
              
              24 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              36 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 
              9 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 + $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4 + $CellContext`c$$^2 $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])], (1 + 
           2 $CellContext`\[Mu]$$)^(-1) ($CellContext`\[Mu]$$ - \
$CellContext`c$$ $CellContext`\[Mu]$$), (1 - $CellContext`c$$) (
          1 - $CellContext`\[Gamma])}, {$CellContext`\[Gamma], 0, 1}, 
        PlotRange -> {0, 0.6}, AxesLabel -> {"\[Gamma]", "\[CapitalDelta]"}, 
        PlotStyle -> {{Thick, Black}, {Black, Thin}, {Black}, {Black}, {
          Green}, {Green}}, Filling -> {4 -> 1, 3 -> Axis}, 
        FillingStyle -> {Gray}, PlotPoints -> 1000], 
      "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Mu]$$, 15}, 0, 25}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {376., 387.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.7407313571491594`*^9, 3.7407314133286858`*^9, 
  3.740731485830511*^9, 3.7407411156932015`*^9, 3.7408013386920214`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "We", " ", "now", " ", "consider", " ", "the", " ", "test", " ", "with", 
    " ", "the", " ", 
    RowBox[{"monopolist", "'"}], "s", " ", "price", " ", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{
      "we", " ", "do", " ", "not", " ", "need", " ", "to", " ", "identify", 
       " ", "the", " ", "threshold", " ", "for", " ", "welfare", " ", 
       "change", " ", "at", " ", "this", " ", "price", " ", "because", " ", 
       "it", " ", "is", " ", "always", " ", "anticompetitive"}], ")"}], ".", 
     " ", "The"}], " ", "test", " ", "is", " ", "passed", " ", "if", " ", 
    "the", " ", "folowing", " ", "expression", " ", "is", " ", 
    RowBox[{"positive", " ", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"D", "[", 
        RowBox[{"v", ",", "q2"}], "]"}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q2", "\[Rule]", "0"}], ",", 
         RowBox[{"q1", "\[Rule]", "q1e"}]}], "}"}]}], "/.", 
      RowBox[{"p1", "\[Rule]", "p1m"}]}], "/.", 
     RowBox[{"k", "\[Rule]", 
      RowBox[{"1", "-", 
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}]}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"2", "*", 
         RowBox[{"(", "p1m", ")"}]}], "+", 
        RowBox[{"F1m", "/", "q1e"}], "-", 
        RowBox[{"(", 
         RowBox[{"%", "+", "c"}], ")"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{"q1", "\[Rule]", "q1e"}], "}"}]}], "/.", 
      RowBox[{"p1", "\[Rule]", "p1m"}]}], "/.", 
     RowBox[{"k", "\[Rule]", 
      RowBox[{"1", "-", 
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}]}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"c", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "10"}], "}"}], ",", "0", ",", "15"}], "}"}]}], 
    "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", 
   "\[IndentingNewLine]", 
   RowBox[{"dTestLocalMon", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{"%%", "\[Equal]", "0"}], ",", "d"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"%", "/.", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"c", "\[Rule]", "0"}], ",", 
      RowBox[{"\[Mu]", "\[Rule]", "15"}], ",", 
      RowBox[{"\[Gamma]", "\[Rule]", "0.1"}]}], "}"}]}], 
   "\[IndentingNewLine]"}]}]], "Input",
 CellChangeTimes->{
  3.7265603985927916`*^9, {3.7265604311327915`*^9, 3.726560447142391*^9}, {
   3.732898717048584*^9, 3.7328987433188066`*^9}, {3.7328988364914455`*^9, 
   3.7328988510168543`*^9}, {3.740641730766644*^9, 3.7406417466018257`*^9}, 
   3.7406418033698764`*^9, {3.7406430884703217`*^9, 3.740643131825653*^9}, {
   3.740667921254341*^9, 3.7406679399340057`*^9}, {3.740669079616251*^9, 
   3.740669193776013*^9}, {3.7406693069284105`*^9, 3.740669388111424*^9}, {
   3.7406694705397463`*^9, 3.740669478057796*^9}, {3.7407248701930504`*^9, 
   3.740724903803528*^9}, {3.7407249347719307`*^9, 3.740724952999385*^9}, 
   3.7407250624524775`*^9, {3.740731861623985*^9, 3.740732079759869*^9}, {
   3.740732169134122*^9, 3.7407322184962053`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0., $CellContext`\[Mu]$$ = 2, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`c$$], 0.5}, 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 10}, 0, 15}}, Typeset`size$$ = {
    720., {348., 369.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$268388$$ = 
    0, $CellContext`\[Mu]$268389$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0.5, $CellContext`\[Mu]$$ = 10}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$268388$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$268389$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[-1 - $CellContext`c$$ + 
        2 (1 + 2 $CellContext`\[Mu]$$)^(-1) ($CellContext`c$$ + $CellContext`\
\[Mu]$$ + $CellContext`c$$ $CellContext`\[Mu]$$) + 
        Rational[
          1, 2] (1 + $CellContext`\[Mu]$$)^(-1) ((
            1 - $CellContext`c$$ - $CellContext`d)^2 + 
          2 (1 - $CellContext`c$$ - $CellContext`d) (-1 + $CellContext`c$$ + \
$CellContext`d) + (-1 + $CellContext`c$$)^2 (1 + $CellContext`\[Mu]$$)^2 (1 + 
             2 $CellContext`\[Mu]$$)^(-2))/(
         1 - (1 + 
           2 $CellContext`\[Mu]$$)^(-1) ($CellContext`c$$ + \
$CellContext`\[Mu]$$ + $CellContext`c$$ $CellContext`\[Mu]$$)) + \
$CellContext`\[Gamma] (
          1 - (1 + 
            2 $CellContext`\[Mu]$$)^(-1) ($CellContext`c$$ + $CellContext`\
\[Mu]$$ + $CellContext`c$$ $CellContext`\[Mu]$$)), {$CellContext`\[Gamma], 0, 
         1}, {$CellContext`d, 0, 1}, Contours -> {0}], 
      "Specifications" :> {{{$CellContext`c$$, 0.5}, 0, 
         1}, {{$CellContext`\[Mu]$$, 10}, 0, 15}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {495., 506.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.726560438279591*^9, 3.726560448374791*^9}, 
   3.7328987446385436`*^9, {3.7328988414985266`*^9, 3.732898852098196*^9}, 
   3.734438170594773*^9, 3.734441371923006*^9, 3.7406417611865854`*^9, 
   3.7406418042090654`*^9, {3.740667924148029*^9, 3.7406679406068344`*^9}, {
   3.740669150594067*^9, 3.740669173638384*^9}, 3.740669346395461*^9, 
   3.7406693916869745`*^9, 3.740669481750576*^9, {3.7407249244895253`*^9, 
   3.7407249537032595`*^9}, 3.740725062913697*^9, {3.740731936312204*^9, 
   3.7407319648670673`*^9}, {3.7407320011565495`*^9, 3.7407320801075044`*^9}, 
   3.740741118123764*^9, 3.740801340294282*^9}],

Cell[BoxData[
 RowBox[{"1", "-", "c", "-", 
  FractionBox[
   SqrtBox[
    RowBox[{
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "c"}], ")"}], "2"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", "\[Mu]"}], ")"}], "2"], " ", 
     SuperscriptBox[
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", 
       RowBox[{"2", " ", "\[Gamma]", " ", 
        RowBox[{"(", 
         RowBox[{"1", "+", "\[Mu]"}], ")"}]}]}], ")"}]}]], 
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{"1", "+", 
      RowBox[{"2", " ", "\[Mu]"}]}], ")"}], "2"]]}]], "Output",
 CellChangeTimes->{{3.726560438279591*^9, 3.726560448374791*^9}, 
   3.7328987446385436`*^9, {3.7328988414985266`*^9, 3.732898852098196*^9}, 
   3.734438170594773*^9, 3.734441371923006*^9, 3.7406417611865854`*^9, 
   3.7406418042090654`*^9, {3.740667924148029*^9, 3.7406679406068344`*^9}, {
   3.740669150594067*^9, 3.740669173638384*^9}, 3.740669346395461*^9, 
   3.7406693916869745`*^9, 3.740669481750576*^9, {3.7407249244895253`*^9, 
   3.7407249537032595`*^9}, 3.740725062913697*^9, {3.740731936312204*^9, 
   3.7407319648670673`*^9}, {3.7407320011565495`*^9, 3.7407320801075044`*^9}, 
   3.740741118123764*^9, 3.7408013423507524`*^9}],

Cell[BoxData["0.23445693036431847`"], "Output",
 CellChangeTimes->{{3.726560438279591*^9, 3.726560448374791*^9}, 
   3.7328987446385436`*^9, {3.7328988414985266`*^9, 3.732898852098196*^9}, 
   3.734438170594773*^9, 3.734441371923006*^9, 3.7406417611865854`*^9, 
   3.7406418042090654`*^9, {3.740667924148029*^9, 3.7406679406068344`*^9}, {
   3.740669150594067*^9, 3.740669173638384*^9}, 3.740669346395461*^9, 
   3.7406693916869745`*^9, 3.740669481750576*^9, {3.7407249244895253`*^9, 
   3.7407249537032595`*^9}, 3.740725062913697*^9, {3.740731936312204*^9, 
   3.7407319648670673`*^9}, {3.7407320011565495`*^9, 3.7407320801075044`*^9}, 
   3.740741118123764*^9, 3.740801342351753*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Analysis", " ", "of", " ", "Figure", " ", "3"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
     "dwelfarep1ECorner", ",", "\[IndentingNewLine]", "dTestLocalp1Econstr", 
      ",", "\[IndentingNewLine]", 
      RowBox[{"Min", "[", 
       RowBox[{"dwelfarep1ECorner", ",", "dTestLocalp1Econstr"}], "]"}], ",", 
      "\[IndentingNewLine]", 
      RowBox[{"Max", "[", 
       RowBox[{"dwelfarep1ECorner", ",", "dTestLocalp1Econstr"}], "]"}], ",", 
      RowBox[{"dmon", "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
      "dTestLocalMon"}], "\[IndentingNewLine]", "}"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"0", ",", "1"}], "}"}]}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<\[Gamma]\>\"", ",", "\"\<\[CapitalDelta]\>\""}], 
         "}"}]}], ",", 
       RowBox[{"PlotStyle", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Thick", ",", "Black"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Black", ",", "Thin"}], "}"}], ",", 
          RowBox[{"{", "Black", "}"}], ",", 
          RowBox[{"{", "Black", "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Green", ",", "Dashed"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Red", ",", "Dotted", ",", "Thick"}], "}"}]}], "}"}]}], 
       ",", 
       RowBox[{"Filling", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"4", "\[Rule]", "1"}], ",", 
          RowBox[{"3", "\[Rule]", "Axis"}]}], "}"}]}], ",", 
       RowBox[{"FillingStyle", "\[Rule]", 
        RowBox[{"{", "Gray", "}"}]}], ",", 
       RowBox[{"PlotPoints", "\[Rule]", "1000"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", "0", ",", "25"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7407321256659775`*^9, 3.740732139260809*^9}, 
   3.7407324579331675`*^9, {3.7407328516857433`*^9, 3.7407328699638042`*^9}, {
   3.7407329222918606`*^9, 3.7407329292834105`*^9}, {3.740803061944669*^9, 
   3.7408030767581067`*^9}, {3.7408031069553704`*^9, 3.74080311041958*^9}, {
   3.7408039018901196`*^9, 3.740803906510363*^9}, 3.7408266524225364`*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Mu]$$ = 2, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Mu]$$], 2}, 0, 25}}, Typeset`size$$ = {
    720., {229., 250.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$956136$$ = 
    0, $CellContext`\[Mu]$956137$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Mu]$$ = 2}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$956136$$, 0], 
        Hold[$CellContext`\[Mu]$$, $CellContext`\[Mu]$956137$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{Rational[
          1, 2] ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
           6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           11 $CellContext`\[Mu]$$^2 + 
           19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
           20 $CellContext`\[Mu]$$^3 + 
           32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
           12 $CellContext`\[Mu]$$^4 + 
           21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4)^(-1) ((-2) $CellContext`\[Gamma] + 
          2 $CellContext`c$$ $CellContext`\[Gamma] + 
          2 $CellContext`\[Gamma]^2 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]^2 - 4 $CellContext`\[Mu]$$ + 
          4 $CellContext`c$$ $CellContext`\[Mu]$$ - 
          8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
          8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
          12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
          12 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
          22 $CellContext`\[Mu]$$^2 + 
          22 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
          10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
          10 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
          38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
          38 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
          2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
          2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
          4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
          4 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
          40 $CellContext`\[Mu]$$^3 + 
          40 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
          4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
          4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
          64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
          64 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
          4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
          4 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
          16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
          16 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
          24 $CellContext`\[Mu]$$^4 + 
          24 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
          42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
          42 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
          18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
          18 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
          2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
          2 $CellContext`c$$ $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + \
((2 $CellContext`\[Gamma] - 2 $CellContext`c$$ $CellContext`\[Gamma] - 
              2 $CellContext`\[Gamma]^2 + 
              2 $CellContext`c$$ $CellContext`\[Gamma]^2 + 
              4 $CellContext`\[Mu]$$ - 
              4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
              12 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 22 $CellContext`\[Mu]$$^2 - 
              22 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
              10 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 + 
              38 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 + 4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
              4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 + 40 $CellContext`\[Mu]$$^3 - 
              40 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
              4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 + 
              64 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
              16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Mu]$$^4 - 
              24 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 + 
              42 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 + 18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 - 
              
              18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + 
              2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4)^2 - 
            4 ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
             6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
             11 $CellContext`\[Mu]$$^2 + 
             19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
             2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
             20 $CellContext`\[Mu]$$^3 + 
             32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
             8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
             12 $CellContext`\[Mu]$$^4 + 
             21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
             9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4) (1 - 
             2 $CellContext`c$$ + $CellContext`c$$^2 - 
             2 $CellContext`\[Gamma] + 
             4 $CellContext`c$$ $CellContext`\[Gamma] - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma] + $CellContext`\
\[Gamma]^2 - 
             2 $CellContext`c$$ $CellContext`\[Gamma]^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]^2 + 4 $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$ $CellContext`\[Mu]$$ + 
             4 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
             8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
             16 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$^2 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
             4 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
             8 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 2 $CellContext`\[Mu]$$^2 - 
             4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
             2 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
             10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
             20 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
             10 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
             24 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 
             12 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 8 $CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
             8 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
             4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
             8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
             4 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
             48 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 
             24 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
             8 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 
             4 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
             16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 
             8 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
             16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
             8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
             18 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
             36 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 
             18 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
             4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 
             2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
             
             18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 
             9 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 + $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
             2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4 + $CellContext`c$$^2 $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4))^
           Rational[
            1, 2]), (-2 + $CellContext`\[Gamma])^(-1) (-1 + $CellContext`c$$ + \
$CellContext`\[Gamma] - $CellContext`c$$ $CellContext`\[Gamma]), 
         Min[(-2 + $CellContext`\[Gamma])^(-1) (-1 + $CellContext`c$$ + \
$CellContext`\[Gamma] - $CellContext`c$$ $CellContext`\[Gamma]), 
          Rational[
           1, 2] ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
            6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
            11 $CellContext`\[Mu]$$^2 + 
            19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
            2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
            20 $CellContext`\[Mu]$$^3 + 
            32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
            8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
            12 $CellContext`\[Mu]$$^4 + 
            21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
            9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4)^(-1) ((-2) $CellContext`\[Gamma] + 
           2 $CellContext`c$$ $CellContext`\[Gamma] + 
           2 $CellContext`\[Gamma]^2 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^2 - 
           4 $CellContext`\[Mu]$$ + 4 $CellContext`c$$ $CellContext`\[Mu]$$ - 
           8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           12 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           22 $CellContext`\[Mu]$$^2 + 
           22 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
           10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           10 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           38 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
           4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
           40 $CellContext`\[Mu]$$^3 + 
           40 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           64 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
           16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
           16 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
           24 $CellContext`\[Mu]$$^4 + 
           24 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
           42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           42 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
           18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           18 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + \
((2 $CellContext`\[Gamma] - 2 $CellContext`c$$ $CellContext`\[Gamma] - 
               2 $CellContext`\[Gamma]^2 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^2 + 
               4 $CellContext`\[Mu]$$ - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
               8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 22 $CellContext`\[Mu]$$^2 - 
               22 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
               10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
               10 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 + 
               38 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 + 4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 + 40 $CellContext`\[Mu]$$^3 - 
               40 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
               4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 - 64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 + 
               64 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
               16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Mu]$$^4 - 
               24 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
               42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 + 
               42 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 + 18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4)^2 - 
             4 ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
              6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              11 $CellContext`\[Mu]$$^2 + 
              19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
              20 $CellContext`\[Mu]$$^3 + 
              32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
              12 $CellContext`\[Mu]$$^4 + 
              21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4) (1 - 
              2 $CellContext`c$$ + $CellContext`c$$^2 - 
              2 $CellContext`\[Gamma] + 
              4 $CellContext`c$$ $CellContext`\[Gamma] - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma] + $CellContext`\
\[Gamma]^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]^2 + 4 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              16 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              4 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 2 $CellContext`\[Mu]$$^2 - 
              4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              2 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
              10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
              20 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 
              10 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              24 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 
              12 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 8 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
              4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              48 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 
              24 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              36 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 
              9 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 + $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4 + $CellContext`c$$^2 $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])], 
         Max[(-2 + $CellContext`\[Gamma])^(-1) (-1 + $CellContext`c$$ + \
$CellContext`\[Gamma] - $CellContext`c$$ $CellContext`\[Gamma]), 
          Rational[
           1, 2] ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
            6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
            11 $CellContext`\[Mu]$$^2 + 
            19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
            2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
            20 $CellContext`\[Mu]$$^3 + 
            32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
            8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
            12 $CellContext`\[Mu]$$^4 + 
            21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
            9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + $CellContext`\
\[Gamma]^6 $CellContext`\[Mu]$$^4)^(-1) ((-2) $CellContext`\[Gamma] + 
           2 $CellContext`c$$ $CellContext`\[Gamma] + 
           2 $CellContext`\[Gamma]^2 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^2 - 
           4 $CellContext`\[Mu]$$ + 4 $CellContext`c$$ $CellContext`\[Mu]$$ - 
           8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
           12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           12 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
           22 $CellContext`\[Mu]$$^2 + 
           22 $CellContext`c$$ $CellContext`\[Mu]$$^2 - 
           10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           10 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
           38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           38 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
           4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
           40 $CellContext`\[Mu]$$^3 + 
           40 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
           64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           64 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
           4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
           4 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
           16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
           16 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
           24 $CellContext`\[Mu]$$^4 + 
           24 $CellContext`c$$ $CellContext`\[Mu]$$^4 + 
           42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           42 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`c$$ $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
           18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           18 $CellContext`c$$ $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
           2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
           2 $CellContext`c$$ $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + \
((2 $CellContext`\[Gamma] - 2 $CellContext`c$$ $CellContext`\[Gamma] - 
               2 $CellContext`\[Gamma]^2 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^2 + 
               4 $CellContext`\[Mu]$$ - 
               4 $CellContext`c$$ $CellContext`\[Mu]$$ + 
               8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
               12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
               12 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 22 $CellContext`\[Mu]$$^2 - 
               22 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
               10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 - 
               10 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 38 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 + 
               38 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 + 4 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 + 40 $CellContext`\[Mu]$$^3 - 
               40 $CellContext`c$$ $CellContext`\[Mu]$$^3 + 
               4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 - 64 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 + 
               64 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 - 
               4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 + 16 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
               16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Mu]$$^4 - 
               24 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
               42 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 + 
               42 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 - 
               2 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 + 18 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 - 
               18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 + 
               2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4)^2 - 
             4 ($CellContext`\[Gamma]^2 - 2 $CellContext`\[Mu]$$ + 
              6 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              11 $CellContext`\[Mu]$$^2 + 
              19 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 - 
              20 $CellContext`\[Mu]$$^3 + 
              32 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 - 
              12 $CellContext`\[Mu]$$^4 + 
              21 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + \
$CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4) (1 - 
              2 $CellContext`c$$ + $CellContext`c$$^2 - 
              2 $CellContext`\[Gamma] + 
              4 $CellContext`c$$ $CellContext`\[Gamma] - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma] + $CellContext`\
\[Gamma]^2 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^2 + $CellContext`c$$^2 \
$CellContext`\[Gamma]^2 + 4 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              16 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma] $CellContext`\[Mu]$$ + 
              4 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ - 
              8 $CellContext`c$$ $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$ + 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$ + 2 $CellContext`\[Mu]$$^2 - 
              4 $CellContext`c$$ $CellContext`\[Mu]$$^2 + 
              2 $CellContext`c$$^2 $CellContext`\[Mu]$$^2 - 
              10 $CellContext`\[Gamma] $CellContext`\[Mu]$$^2 + 
              20 $CellContext`c$$ $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 - 
              10 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^2 + 12 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^2 - 
              24 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 + 
              12 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^2 - 2 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^2 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^2 - 8 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^3 - 
              4 $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma] $CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma] \
$CellContext`\[Mu]$$^3 + 24 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^3 - 
              48 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 + 
              
              24 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^3 - 4 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^3 + 
              8 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 
              4 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^3 + 
              16 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 
              8 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^3 - 8 $CellContext`\[Mu]$$^4 + 
              16 $CellContext`c$$ $CellContext`\[Mu]$$^4 - 
              8 $CellContext`c$$^2 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`\[Gamma]^2 $CellContext`\[Mu]$$^4 - 
              36 $CellContext`c$$ $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$^2 $CellContext`\[Gamma]^2 \
$CellContext`\[Mu]$$^4 - 2 $CellContext`\[Gamma]^3 $CellContext`\[Mu]$$^4 + 
              4 $CellContext`c$$ $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$^2 $CellContext`\[Gamma]^3 \
$CellContext`\[Mu]$$^4 - 9 $CellContext`\[Gamma]^4 $CellContext`\[Mu]$$^4 + 
              18 $CellContext`c$$ $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 - 
              9 $CellContext`c$$^2 $CellContext`\[Gamma]^4 \
$CellContext`\[Mu]$$^4 + $CellContext`\[Gamma]^6 $CellContext`\[Mu]$$^4 - 
              2 $CellContext`c$$ $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4 + $CellContext`c$$^2 $CellContext`\[Gamma]^6 \
$CellContext`\[Mu]$$^4))^Rational[1, 2])], (1 + 
           2 $CellContext`\[Mu]$$)^(-1) ($CellContext`\[Mu]$$ - \
$CellContext`c$$ $CellContext`\[Mu]$$), 
         1 - $CellContext`c$$ - (1 + 
           2 $CellContext`\[Mu]$$)^(-2) ((-1 + $CellContext`c$$)^2 (
             1 + $CellContext`\[Mu]$$)^2 (1 + 2 $CellContext`\[Mu]$$)^2 (-1 + 
            2 $CellContext`\[Gamma] (1 + $CellContext`\[Mu]$$)))^
          Rational[1, 2]}, {$CellContext`\[Gamma], 0, 1}, PlotRange -> {0, 1},
         AxesLabel -> {"\[Gamma]", "\[CapitalDelta]"}, 
        PlotStyle -> {{Thick, Black}, {Black, Thin}, {Black}, {Black}, {
          Green, Dashed}, {Red, Dotted, Thick}}, 
        Filling -> {4 -> 1, 3 -> Axis}, FillingStyle -> {Gray}, PlotPoints -> 
        1000], "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Mu]$$, 2}, 0, 25}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{810., {350., 361.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.740732140516824*^9, 3.7407324582650576`*^9, {3.740732862706865*^9, 
   3.740732870611557*^9}, 3.7407329298717513`*^9, 3.740733012633746*^9, 
   3.7407411200744066`*^9, 3.7408013425001516`*^9, 3.7408031124339757`*^9, 
   3.740803907569211*^9, 3.7408266529038067`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "The", " ", "relevant", " ", "intersection", " ", "for", " ", "the", " ", 
     "test", " ", "to", " ", "be", " ", "used", " ", "in", " ", "Figure", " ",
      "3"}], ":"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"\[Gamma]threshold", "=", 
   RowBox[{
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"dmon", "[", 
        RowBox[{"[", 
         RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}], "==", 
       "dTestLocalMon"}], ",", "\[Gamma]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7408039394239*^9, 3.740803977540268*^9}, {
  3.740826673575817*^9, 3.7408266875268884`*^9}, {3.7408269414812517`*^9, 
  3.740826947624586*^9}}],

Cell[BoxData[
 FractionBox["1", 
  RowBox[{"1", "+", "\[Mu]"}]]], "Output",
 CellChangeTimes->{{3.740803948696561*^9, 3.74080395921052*^9}, {
  3.7408266837649145`*^9, 3.7408266879199295`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"Figure", " ", "3"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{"dwelfarep1ECorner", ",", "\[IndentingNewLine]", 
       RowBox[{"Piecewise", "[", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"dTestLocalMon", ",", 
            RowBox[{"\[Gamma]", "<", "\[Gamma]threshold"}]}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"dTestLocalp1Econstr", ",", 
            RowBox[{"\[Gamma]", "\[GreaterEqual]", "\[Gamma]threshold"}]}], 
           "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", 
       "dwelfarep1ECorner"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
      "}"}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"\[Mu]", "\[Rule]", "2"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"Figure3", "=", 
    RowBox[{"Plot", "[", 
     RowBox[{"%", ",", 
      RowBox[{"{", 
       RowBox[{"\[Gamma]", ",", "0", ",", "1"}], "}"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"0", ",", "0.7"}], "}"}]}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"\"\<\[Gamma] \>\"", ",", "\"\<\[CapitalDelta]\>\""}], 
        "}"}]}], ",", 
      RowBox[{"PlotStyle", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Thick", ",", "Black"}], "}"}], ",", 
         RowBox[{"{", "Black", "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"Black", ",", "Thin"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"Black", ",", "Thin"}], "}"}]}], "}"}]}], ",", 
      RowBox[{"Filling", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"2", "\[Rule]", "1"}], ",", 
         RowBox[{"3", "\[Rule]", "Axis"}]}], "}"}]}], ",", 
      RowBox[{"FillingStyle", "\[Rule]", 
       RowBox[{"{", "Gray", "}"}]}], ",", 
      RowBox[{"WorkingPrecision", "\[Rule]", "60"}], ",", 
      RowBox[{"PlotPoints", "\[Rule]", "1000"}]}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", 
     RowBox[{"ParentDirectory", "[", "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"SetDirectory", "[", "\"\<Figures\>\"", "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Export", "[", 
     RowBox[{"\"\<AECTestCeKFigure3.pdf\>\"", ",", "Figure3"}], "]"}], 
    ";"}]}]}]], "Input",
 CellChangeTimes->{{3.740644001740404*^9, 3.740644057870713*^9}, {
   3.7406441501663074`*^9, 3.7406441583189974`*^9}, {3.740644213064696*^9, 
   3.740644250589542*^9}, {3.7406443789790707`*^9, 3.740644382189617*^9}, {
   3.740644414062456*^9, 3.7406444858634744`*^9}, {3.740644545332714*^9, 
   3.7406445609452515`*^9}, {3.7406445971225185`*^9, 
   3.7406446318940353`*^9}, {3.740644662950718*^9, 3.7406447430768833`*^9}, {
   3.7406447807992554`*^9, 3.7406449442441597`*^9}, {3.740645039436449*^9, 
   3.740645206548106*^9}, {3.740645242242112*^9, 3.740645249566572*^9}, {
   3.7406677101255207`*^9, 3.740667710433334*^9}, {3.7406677466507363`*^9, 
   3.7406677469966216`*^9}, 3.7406678748548775`*^9, {3.74066808718782*^9, 
   3.7406680895040264`*^9}, {3.7406681465107155`*^9, 3.740668147691819*^9}, {
   3.7406682194688015`*^9, 3.740668255292119*^9}, {3.740668310709622*^9, 
   3.7406683284527893`*^9}, {3.740668374665753*^9, 3.7406683791587086`*^9}, {
   3.7406684376533585`*^9, 3.7406685863881483`*^9}, {3.7406686196364193`*^9, 
   3.7406686349000626`*^9}, {3.740668666195305*^9, 3.7406688032402916`*^9}, 
   3.7406688788409815`*^9, {3.7406689319262295`*^9, 3.7406689365334845`*^9}, {
   3.740731651931921*^9, 3.7407316598854313`*^9}, {3.740731696480195*^9, 
   3.7407317273997564`*^9}, {3.740731817028944*^9, 3.7407318383938074`*^9}, {
   3.7407413614899893`*^9, 3.7407413886947327`*^9}, 3.740826643225069*^9, {
   3.7408267269437323`*^9, 3.740826922476709*^9}}],

Cell[BoxData[
 GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJwkm3c8lt//x60UKiUKJQ3ZCQ0NeUkRSQNllU9WSCWJpOwRiUoSIjKLZO/t
vm3u+7b33lsKofK7+v7+8ng+rnOd67zP+33Oeb3uh7PX0FLdhIGOjm5oIx3d
v783f7HNPpTeKmf2czdBNNi9/1Go9PIyMu6mZpDpaViNXeH8ZXkL/zl7zSQw
0rCvovYJzcIM05JLHpbraLCK1Ymu5H+Aq2bTe4TW0/B1n1bCW/1HyHtZ60TH
QsNdyu7UVk07MHzUos9ipcEr7YE2c8QzBCp4fPHbSEO2yUhwgIUzor8O79bd
TMN97yfPBwxd0aNs4si4hYaGqnpyjLs7rgZSFOq20rC8l931gKsn9GNPadls
o8Hzbb1OuI0Xeh/FM3Fw0VCyV8fF7+0LeJtv16Nsp6Gwokz4pO9LyPLnlphz
02D+YolfL8UP2q1DxwR4aTh9uJU7z+Q1ZOec2Rt30iB0MKY/9tYbxNUM5xnw
0WCWcU297oE/pC0dsjfz0+Bd9Yuh4f5biDKSpj7soYHhrqPeVtcAnC7za1Xa
R8PBD0olaq/foZKJy25kPw2nrtObmr0MhKhfCYfpARoiwj+mF4S9R71VQCyT
EA3DjyQUvocGYal86L2bMA09LXTde98Ho1w7at0vEaK/igx+39gQTOeT073E
aNA/ezOyJeoD6L8PPlsVJ95XG63VzQzFlJnerLcEDXuG05i6SGEIX/v4ZZMk
8f0N1s9OFX0Ep3/GqUdSNHzL4QxtpoYjSeN7wYI0DS5Pm/4ImkaA84jdE90j
NLj3Ib1/MAIvY4qRcZSGtJehhScsPsHwtP0ZURkiH47zY87jn8AW7H3E7TgN
fNknTE0eRiKr2JWycIIGbRn7dSfmI9H4ipp78RQN07/1RH0soyDz8+BasCwN
iSyHouyXoiCU4HqMTo6I58bqKR3baDS/136sChpOLmYLN69FI7FYdkeSPA0P
WnaEUj1j8P69WecGBRre/7Y8lMMUi6ii10bKZ2kYN8/ZLu8bi5GTNwLCz9Eg
zvebL3NjHFL3Gox1KdJQub0vId47Dtm54vxbz9PwWivDV3brZ1w74qF2Q5kG
5R63VwWvPmNxllnDT4V4/+vZ4U7uL3gu9ryw5QJRL8XRJXbhX7DkGNfOdZH4
Pu9aARNfPF5Yi7vJqtEwl3dhs0RMPLjA22t3iRh/1CtHJYEEfCemNewyDUn1
ZQq/ExPwwELldcsVGhyVwnwlj36F5wuPBWZ1ov7o7//SSPsKjjnBP/waNAgz
SmZxyiYiQl/RWk2TBibVyXfkvETQTv8YM7pGw4n286vzx7/htdUE58PrNIR8
e5deWPwNVxFBH6BFw2RVl+8TJEFGYt3HcG2ifsW58uork6C9V/duoQ5Rf3ce
yzQJJeO44svCJl2i/4Fbe7NuJ2OI3GDdrEfD398KGWPxyZBKJsWP3SDiy93b
/mYiGXNhhhEjN2lg33VVfkU4BdeUt9d36dNA2vPkasrdFFiwnG0b+o/IV2XY
fG9CClT26qi23aIhdVve6ZtzKSjOkNrQbUDUA30zt7pkKn6zybysM6Th2lvI
MFum4us5u7eZRjSoV0aubUhLxZJq1YlkYyI/EQzabvOpEGof0wg0oaFxp57u
RZk0NOVXO7+8TYPPSaaIJvs0bHLdv2ZvStT77y82TTlp4GM6+Om6GVHfBsoL
+/6mwXE88/MZcxqKzAeZxk+ng0Wq8CDvHRpEuaha95+lIyCgPWuSYDHjNE2F
4nT0qgqs1VjQIHA9oN93LR2R79vvhdwl1sPkPW7hcxloXTFmf3yPBkuBIH+X
5xmwLChzv3ifhv10RaHq5Rlojy2gbLGk4Z5Tz5WHrJkwmYyKGCA46dNKAMuF
TFhPeIVHPaBht6nprltemQgX375f34p4n1artq42E3pGHl4HHhLruUuCfR9b
FjySL5Z2EZzm423vezkLy7ufXIuwpkGup8/mwass+J7az6X5iIbFRq90DkoW
PjpXfaS3oeHsPZEwRo5sWHfs7col2PtLOdfdq9noyuieMralwdj7xvH9gdnI
UecR4X1M7Ncbz34Mbs/Gjuqwv5X/WFow4Dl3DsT5466a2xH73W/6I+QbOaAJ
9whxPqHhjVmHkV1oDiS+WzUkE3zRjrF1siMHq9X05PP2NISJHfiZuDsX96VE
3o0RPOJy9tPozVwUFYn2Pn1KQ9lT3V+Wkbnwl1Nz5X5GQz13qX/WcC6O20nI
JhHcrC1YYCuQh7DzkdtPOBDzLev2xt0sD5VhK1E1BNOTuhZYPuehIscp7qoj
DSLTEkw9U3notP3W2kuwY279NSvJfDw+c9nIzImGGlErmWeW+ThR+mDjMMHf
5FhIzWn5MDBQlDV3JuZnIawn9kc+Rq0ZevsJfnPZ7bSMdAGUwOR1zYUGCTUD
pe22BTDYabCdRjB5+lTv3YwC3Jl0zYErsV6k2PdxrBSgQsGgIINgZZ7Dn21P
F4LPN+e9oBsNwVEaherPCuGdPCnmS7BT/V1Hh+JCbLjU+GyZYP1IVwo/XRFy
lZs69dyJ/Wf7uIGLXBEunK3PySGYVUI5XMq1CEbXWTJ2edAQNRZ1V6ekCMkO
nPq2BJvv//19lKEYFtNnPzUR/CcqeqFnXzHehd4aEfEkzjfbhZCjCsVY+sg1
ZU/wrhCFd4eNi7GXM2iKSrAvu5/WtFsxDs67+e16TkNVS/P9S7HFECOd+3yX
4A+zZULslcUoiDuqkU3whE76Z5/RYvzNUlD4TTDj9nDHJJYSmDRzrT/rRcS7
32vXK5ES+BiwGbkSXObKc4OiXILdl+QXCwjOPxw3l36nBE+3hZesEnzo2GE1
rRcl2OQeXiLtTayfF3l/I76W4JCMrJ0FwWckp65eoJQgc3KTTATBb4R23kua
LsHZtzI1FIK/PlDqzmMvhdLMJ5u/BJ9le8DlfqgUBfeMzwu/oCFm6V3kj6ul
SP86kahO8MejxvWl1qXgXqLefELwtjLJSrW3pchLDGgOIVgjdnmbc0Yprp5s
OJNPMHt7sdD95lLs29lW0UawwU3J7ryfpSAZbj01T7Dj4dDR5O0kZDA1MrP5
0LBDjznX4BgJadwtz/kJftp0tz9Hm4STaYf7pQm2CX8ab2VPAutm5mUFgqfy
vE4NB5Pw8m6V8WWCD4r676XLJ8Gp+SCrLsGT48HUlk4SPGfsNA0IxqoK/6ZV
4rmH4JoJwfr6i6SJXWRc9V6vYkbwMscnSXdZguW86k0J/o9HeZ6sT4Z7sKq9
McF6Vu+vmTiTsW6Y4Zo+wY28w84l4WQM611gu07w9u2H6MtKyPB0CDx3geBm
w8cq7v1kPBhw+SL7rz/6/JEJxjKE59txiBHs/P3zgZQDZXCR/Ti1nWC+wwHi
hxXLcN3m7Ct6gj3Kn3rdMC1DZVVc0CgxX+YJBl/PPC+DveHb3FqCB/tnrTxj
yxA/XDidRLDwHfuXDyvLMPb57YwvweNnGS15x8qw8e9KuAXBNpZeseas5eD2
OfrpLMHvpzKcuMXL4frN1oOH4GN5/XvcVMsxVe6bMUvUQ0Qny45398oh+vF5
cBHBnmqSzYa+5WCp8+Z+TTDD1rUjr7+WQ85wmfs/glUEq8eNKeV4sOJ+VIjg
jb5vby9Ml+OoSKjbHFGvIYo6xw9uqYBAPZtVKsHRl/ka9khWoPKpbK8NwecS
vDc9ulyBcdsWtuMEJ2nPh923qoD3jTbME+slUEtnUeBNBUrMDvp8I1j5c36U
a1oFWj6uMzAk+M2Fynk0VyBN6mgFJ8HX5RpYcn5WIMfbraeKWK8jbm027dsr
8UfcadiG4Hne7i8Zxypx/xnrlADBAYwvnL5fq0QjhcbfSOwH9HKH45seV2Lq
o8fXxwRPVHWEWr+vhJLmjzp+gj/GOQ7l5FQifbdJbQGx34y3VNf911kJscun
qnUJTtbicipZqYQ/z6GFVWK/UhC94VG9qwrHhJ4a+RN85dInjVeyVbhwNfTi
QYJFyAO2q/pVaHT58zuf2A+DfGpPVThX4Xi4z7gqwW7R6ZWXIqpwZoPVeC+x
n55gD453KK1CfFfidjOCLWqeapoNVKFqA0vMArEfH2lnjkilr8bu/j1sbgRX
HPeTj95fjU0XEzcwEdw6vu3L1bPViGvXWH1B7O8pU+9ux5pUI8fvBOs6gved
KS7TfV6NBElukiNxPrCPjk1Vx1ajsfnChjXiPKno2WQ+UFmNLPl+mhXBq0JS
iRlj1bClG384SZxHZaW//cfW14Cp7YCOCcG6SeS6UpEaiMeOHKwnzjOL6Rc0
bZUaMGR33z9H8HkHNeFAixpQsbT/C3H+hetvVn7lU4MtBg7+XAT7vXnMMhZf
gxP7pZ1difNTeXs3/1htDeTsmy72Eeet45T836ipGqhz9ZsoEezE+UlqPXst
pDcdHQwlzuftfl+YqyVrcYa2nPKDOM9FdJKjlK/UwmjR1EiD4PW2ae/uP6yF
CfNQXyRx/hsMpV++4l8Lz30xvquEXlCP1k94k1KLiQz2A9cI3pTJdMO+sRYL
t079DCP0hSLPl6bdP2pxQ+iV+xyhP85TVCLvcNWBwyuvQYrgvib/rdtl6mDt
tNptTeiXBfEOZYfrdXDg9kExoW+aW/iafezqUJkWXLFC6B+phv9ErgfVIaeJ
YR4E7+e/wO+cVYea14FWnoR+6iuQvHO1vQ73wg675xL6iucbl0PPrzp82sFc
vUzoL765xSGOnRRISn4RESQ4zK2Fk/EUBTNRqRv0Cb2WbqY/oq5LAeUG1fY9
oecCwwc2XnhGwXuRtjsFhP77KWSy+vsDBSNV1pazhD7kYxiS0yqkoHrSzHkT
wV0H2QS29lHQ/qluXpzQkzsSJOs91yho+3KSVYfQm3z26o1Re6lY+Mvw/gGh
R8NDHoY9O0OFOqMr5ztCr2ZvPMWScYuKFlPKizxCz36grVUFuFKx/delwVpC
764Ol6pLRlLRKFeWP0noYUE1V0lrMhXlpMdrPwm9PLpuIolrhAqJjw820RHM
seHzag4DcS50ThziIfQ117H2qnzC98bRax/YRejv1pcsz8IIn8n+7qn9QUKf
O27MbqsnfJzw1GER4X/6Pf0kcybhg8QP7uwWIPT9Hs/8HXaEj5COinGXJPT/
Mef8Rl8irvOvfs0IEP6ANSrP2oWomxX/a0HChH/4MuM39G8f2XQwuVuC8BcH
jfrWdr6n4eGVBnU+wn9Y0kmtzcXSEBtXFbiT6Pd9+dpnnmwaqEeS39AT/uVF
RuT++UoaWPinVsYJv3Oq7pzr5zbinK/jLR+4SvjJTSY+qeOED4lYn1pK+COh
x+52IcvE+G4NXEgj/NN5Frtj0iz1iAhlGYsl/NVF8vhHPt56jCS7bnMh/Bf7
Z93JEZF6CJ6Yt79L+LPsdJUBxlP1YL2h+eu0Kg38EzIFfy/Uw2jXwO89hJ+7
qrxi9kW3HqGij+TWE37PjHqyKM6iHk2yCwyNhD+Uc7Jfdntaj+8K+3qSlYjz
U+t4T9rLevT/NSJZE/PopFP99m0Y0d+HpqwThN8kuekdvJpYD3Wv6mschB+d
brljZVhYj6Vef1PqGaL+1Z8EX6XU441E1r1wws96Len5z3XXY9vlbG5rwu/u
Kcs/OjhTD7m3TDGihB+2zdtVkPa3HiH2bukLhF9O7ViZaWVvAOOlNvFowk/n
7Ev8nrCnAaflsev6SSLfb/Xbbko2QO34pr27CP8tctDP3OhMAzja+3+RCb/u
P5vfo3S1AepsHyVdjxHrq8P8r4NhAxK4jEv3Ev5+eWZixti6AUaP2JnKDtNA
E7Mgibg1YEHkv+MO0oQefGOuoBDQgOgqWckdUjRs2GMaczy6Abs3e5iUH6Lh
Uuvx9p60BmQWoe+JBA32WV5ZbeQG8GcX+mw+SPiL4tYnyU0NYHlnzZgjRsPh
+eiRzuEGvBA5c/icKA11F5UEshYbULfF1r5RmIYDtBHFB8yNeJC8dc8TIRqM
nq3jcNjRiKi46NG/Bwi9cXV/qalQIyQ1d2p/ECDWz2WuswwyjdBN+fFIllgH
DTYe9+fON8Iz/PLegr00yJb9dMjXasSWvDama3toeHl6QKbLrBG7VJ3WanYT
66gnqjThSSMuOz2zO89H6JfPxlI63o1IV9LL7dhJ6KsPURd0QxoRd9LV4SIv
oVcz+8+fiG/EF4NyjRZuwr+ths1a5DVCwP+KtNwOGlTNJMwu1Tbiee6zingu
Yn39LSBv7mqEbCMvgyQnsR8X1NTsm27EMXujb/4cxP4U3ZbJ+acRTcEJFzZv
/bdecx5mbmxC91qy9Ct2GiRnuNsT+Jowznl3eWoT4T+uPN7vdLAJQTxRcsYb
adjaqcEdK9eEkvKi8X+/rxX5MfU8u9yEDwanUrewEH7WIv251H9NcHy038dt
PQ0ODwY6TzxoQu+Q9+GGdUR+P7Jz7nFuAoNWxrFTTMR6WNjCl/mqCUfm5ia/
EPuOsM1rWnhEE/JjR7p/0BHzxcduZprcBMl8d6uUv1SwzbLFu5Y0QeD7zSTJ
VSoOjq+nPa1vQmLGbc2RJSp4N7aVC/Q34YdCW23cTyqmtQTN9s43odnpcCzf
dyoca62nV+mbMS9sxlQzTcVPc/CJbmtG2eYmmtgEFUcle/k2CDTj2BaJbUHE
vniE35GBfLgZNdrr12QHqeCR+fCm8VwzLoe1igb0UpH/OIupRLMZXhtOvBPo
okK0P05Z37gZ3658DS9pI75nvV3msk0zthVvJbE3U/Fawp1lt0czUnREFILq
qXjO8cBTPrAZzBafR2l1VKjwSzZxxDXj++ZQKlc1FVWas+tImc3oGrCQCSyn
4lCa+EB5RTPupDi/LyulQuOkeeTn1mZszpLfKFVExY2J/Zt6xppR6SzvcSGP
CklSqjJpuRmF+zyTH2RRQSLLm3mytGDtjsT2pjQqTs1elA7jbUEmOK8MJVFh
paDd90a0BeetF3Wkv1LxsFDmv2MnW8D55eoZv89U6Bi985JQbcH1St6md9FU
/JWcf8ek1wJLMbFrXRFUeAnVqUncbQHHlljfulAqupWetax3aMHOlzsUa4Oo
mPMTPVv0sgVFvSe3sL2jYnztum51WAsapTMMf7ymIiLY9VpaYgs8j17R3+VL
xb4brnsvFrSgmrWIUdObihfn6YKOU1rAIhmx/ogHFcl6DvMMPS3Y+zCx4ZoL
FXlBdkt7Zon42rk28DtQ4f73Yd+utRbw082HiD6hgtv3TEjl5lZcdylRUrSh
wv+c398K/lYUNTBLM1tRUS3QoRRzqBVSVx1CWO9RMXow+kSLfCvklpIupptR
QftP4U/m1VakNl7PvmtMxePc3mgbg1Z0qQpUmhPnMKPc6uLzh62Ybb4xy3qD
CrUJroN2rq04bTN35bsWFYZFTEe4/Vuh4nIraFSDipsFVsNsUa0Ifr+t1vky
cW4Pddt3p7Zic0etzi1VKtIPV+YykFtxT7ylu1+JCr6vnjWtTa24ILM0+lCB
inNq54pfDLXiBMNWa1U5Kq7ucP7vzUIrRi5TS8gnqNjFmjdgs64N9SUZQp5H
qag98GjLt+1tWBB8pTMqSYXyHXr2QKE2hPtruWiLU+Ha6vtdT6YNTY1c4xzC
VHy6F+Roo9wGz/Mjoxb7iXoWj5y9q92GuwyUgs38VAhyOktxmrXBOXIkq5SX
GK9AFx/7kzZsy7m2k3M7FXT6MjOjXm3wc3v4OHkrFVLFW8w5Q9oQNtd0bnwj
oTtUC9Pn4tvALe/YLL2BqIe/d4bic9sw4EJ5XslIhXfnu8LsmjZE0q/YLP+l
YLSv6Fl0ZxvIdnR8j1co2MJeyCY/2QathPQM5kUK+G+fVDz0uw0BYn/1JL9T
MDWcYfibrR0MF2e64qYo+OiXJMrH147XaTMPs0cp2HnLgTR9sB1ZE1rBHQMU
aOlekA893Y4I1TiSag8Fdg7vTD9easde7uVazXbieVXvQ0f9dpzR9LBKbCLe
l/ssnGrZDraYmJVQKgUJneeS3jm348odRfeP1RQsf+rj0XrdjltLd5rmyigQ
f7MicfdTO/LaEmhtxRTwfdkm/F9KO8Jc6sU48gkdOE43T1/SjpQDh7P1syh4
qnH39q/6dqgn6hYhlYLO4ZbC2v521BcGqFgnUrDnU1HJz/l2nNr4UuPkZwqk
PJ69q2XsQLLyQXHOKAro/I+ruW7rQMtyRNqZjxSkVzxM8hHogPoJTxf6YAoE
Bb8uPDzSAZCaArkCKDBKzNnIeq4DfxSWE06/osDzpiLlp2YHJq6aNS96U2B6
jGZdYEz0/3TizjoPCg4ebye123RAJWiNO9qJghTD/qVGjw64bm6tDbKngD6z
4LfDuw6YGHXOfbKh4Jg099ensR24fL7014kHFIi0WkErswN9swoHRSyI9jEq
Dp4VHRjo7zwfa0JBzIcFH5O2DkxTvtyXuUXB+rwIx31jHRgU+jC3R4+CS4zV
Ow8vd4Cuo27n+2sUaDyaD93L0gmzz/tkb1+hYP/m2Zki7k4Yj8SFXlAl5pdm
Ppki0om5wYIHuYoUqOUP1ric6ITWB1sDd3kKYmmd12MudKLFak9F20kKajZ9
TrXT64SJjdsGhaMUfLO2nhex6ETNGPUdsyQFtgwFXRLPOvHjGK+upigFv3PW
JWx92Qnnh1+Y/gpQYBZSu185rBNS1cbDh/gpCI8yvSfxrRNn3KS3PeahIKCZ
/sN8QSfue4xr7+Sk4L4krzUrtRNy1RwBSpspYE6XOkTX24mra+mu1A0U3LnF
lx8zQ8SX5Llwn5GCtKPPf3xc64Tj/ZMCAX/qkHt4brMtexf8GTdLcRM+Jk63
tSliTxd2aS0s7Zmvw3/x/hZPpbpQ1MnQjak6NO9TGzl8pgsCGcUNhSN1kCR7
sMmrd4Fe3Ee+pK8OKn4FnKKGXWg1ZtUT6KzDQZeqGZJVF9yUM2s+NtdhKVTD
OsW1C/Kp7558oNbBqb+r85l/F1T3l6wtV9Vh6tLQzIeoLpDeyBe3k+qwY3hi
OCitC9UW6os7C+uwObosUZHUhSuOBT9tsusw4bN7j1JTF5RWC2cvp9bBPdTW
VmCoCxWdZn6+X+vA1HLx8fWFLozJ3xW4EFuHy8eXlI8zd6PebdvO3RF10CZF
/F3i6gaPmNfk9ZA6KD2u1GcT6sap65N3NwXUYV5jNvL3sW58Oz5rIuJXhzs6
E1lhSt1gXTi5etOrDhXPjR77a3Vjv4IcA7trHQZ6OnlNTLvx7uf2ZMFndRjU
bzDzseuGsKRUVY5NHZLWhz038O7Go2PHt5tY1uFE++0XXMHdUFGyPGNnXofP
jd9k+OK7Ico99GqdETHfiwuVDLndEHBe1F29UQeKwlaxoKpuDC3UBbJq1eFr
VryMS0c3EtJ5Mvyv1EH52llh5YlueH6ydHa/UIeqnbokw9VuQgfZCM6crQML
2wMFPbYeqGpd4Sk9XQfO/br+jDt7kHzt8VwS4ZOZjEtfron14Ev5bX1OqTqk
1olYtJ/qQeQhlYtDosT83GL/yazWg6PHo8pFBOoQs7NKbehmD8bebM/z4qtD
6ZqLT/i9Hqx7P3FHc0cdyBtzrL859mDXTyXdgC1EfhRm8cGvB8oFzjFnWOuw
5dNyl8zHHlw9Xp3AwlQHF2FXAeGkHnCWzyac+1OL5DaWK4uFPdheZyc7s1iL
shR2QW5aD5IObc9jmatFTNp47XhfD+rvNXhjvBZne0q1gud68GK298DwQC3K
pXh9Q+l7IRslbrDaWYv13x7EOmztxX6n9WyuzbWQ0FC8k7qvF9a1nxXtKLXY
s3fmb+DhXtRcPq3oXVEL2o7Axzpne1HbdfwHW0ktTGTyQyw1e5HPWNT7O6cW
OU79n4yMe/Gjy5jvVlot2uY6nqx/1IsgmoVJ79dadL1Q//3XvRfsg5s/1cTU
4qNalWFTQC+Elypui4XXQulEofWfmF7QnWLcsvSe6E/t+bWWTOL7lOjrPa9r
MfHi8k7f8l7oXhw1O/miFnTf3/m8b+3Ff+eusdK71aLJqbPXabQXmtqLvKef
1eKRzAIT91Ivtnju3hJoU4s/PkoT9Ex9OMTx8Lz2/VqEb+Egj7D1Qc8oQviN
aS3SvuyytuHsw/43Iielb9VCsFWQ03pXH2izX0Iu6NRijftDmLJAH0RSVa47
q9dC1fLS7wrxPtx2Lvq+S7UWizr0aplH+tCl2Mcjfa4W23R+PLx0ug+GDQc2
JcrWIvDuZZdCxT4I/zKbOne0FnacCS5han2Q9qZ8vC5Rizqaopbg9T58KBcp
rRWshcvevt279ftwQi5Lv4C/FiGeQ5Rpkz6oMOkfruUmxkcnrGl6vw8xPyUE
5bbWYutmi5rLtn34uKmqXoy1FpaS0zsGHPugULns/pShFtKm7RcvPu+DeO0J
uvGVGmhKl1kfeNWHcq7cZ40/ajC+dc7y8/s+FAUcjd49VYNuD179kPA+zEkz
PBodqsG5ze57j33ug9ngwWb27hpsTdCq+5LcBw41B9vrzTU43SVq8TK7D488
+9h2UWrQufd0D3dJH45tlG5AeQ3aVi+d5azqgyVN8+hgYQ1OTVS/HqX1QWp+
q2hsFtHftEeacXsfPPsKF8uSaqDkLl95pb8PvGl7Ym5/rsH0oZOpI+N9QEQ5
u1FEDVZmw9w15/tg9zA82DGoBrfP0atIrRD5cBLQ2PWmBoqJUQNZDP1QSWs1
4fSugVu84v1E1n489d6i/sqlBoL5VwfsOfqxHC+aImpfA9mBULF53n74+nRu
4n9Yg5TQ0dtt+/rxvkXQ5/2dGgRbWD02E+vHDVGZMVPDGoxcMnlAO9yPY2yF
57R1a/C2XFsv7lQ/DBMEOSjqNUhV99kpfK4fFoIOOiEXaiBpXVC342I/vL9l
508p1GDvZ4lrKZr9kOeg2gWcrIHdd5ayfTf7Mbw97dsN6RpIUIcEGU36we+u
pvlVtAbXS/7e9L3Xj9AwytjlfUR+znM/97TpR0FYc/BT3hpUD3wI0nLoh7nj
ud1VHDUQ9dd3avDox9vGo4fMWYn8Nu/Rzvftx4/dH774M9SAV2If85XAfhx2
5vXdtFKNlBDf0LyP/XjJykT58r0acR9+CQTGEu8z5FJo49XYkhLpypvUj9Z9
wTXn+6vRpnuxYVNWP85z6R670F6NdTy3WNsLiedsCbqW9dWImUzdcamiH/fN
G7gGK6sRrb5uhzS1H6v2qn6DxdXYTgmcLGrtB9ufssdS2dUY7RZKze/tR9g7
N8rG5GrsZthv8Ga0H17rJ/XYPlej4uTNYfa5fgyYkOeuhVeDuv693p+lfryz
+qN46H01LoyzxwXQDeBtsd4TDb9qiPXOdzCyDECpKOVOiEc1LMyb6Qa2DEB7
WPiJlUM1+DYsrZrzDOBnpfb3N4+qIXGKe/zW3gFc6Pojc/YuMX7XqMJDIgOA
xelwbuNqvOq5Z/5ZagDCDk8Zj+kR8VNkmF+fGEAHienlsHo1Mc/ydnsVBlBQ
8Gm4U6Ua6VNpDS8uDCA4YX54Qb4aR0IE+Y3UB/BoQPxO1PFqCN1okx/WHcDh
/ZnnAw9V40mqt2aL4QDWNs/o8QlVQ47P/rSVxQAMrg8Gj/FVwyy0afOQ9QAY
mB79aeWsxvckiYaypwPoU7+wemNjNaZbK+5cdR/AlsynsQKM1VAOuLWg+nIA
+27mR7iuVIHFxMhsd8AA+rcIijLPV0H2QkxySOgAjpKvTFWPVYFCGpnwiB4A
7zFpXaG+KjReNV3hTRwg/LQVhdRSBbmfV+efZwyAbvGPpkddFTaIyXYZFQwg
a25uupdchXO2Jh/GywYwmK+46UleFXqv+V3sqRvA6HedhYTUKvSp7B2Jbx5A
EJv5jXXxVdBU/6G5t2cAw3+y6j9EVEFolpzBPDKAQjFHy7r3Vbgb0Tz5bmYA
XNFHR076VWHLyPC2gMUBVP5pOH3Oowq88rcE7vwdQEpyceCjZ1V4/42HdYJ5
EK1nClV7H1bBOqWhv23zIK4eeKw4al6F0spqP6sdg2h4ttlQ+FYVbH+KCwzw
DyLIl57u9fUqeKf7JZQIDcJ4hXolUK0K7N6HNqhKDqKXrvdU09kq/PxOvX72
+CAUWEbfppysAiw7fLfJD+LBkFN/plQVftMJhPgqD2KtNlF5XqgK3EL3gmyv
DOK45JIbZXcV4gwWLFh0BlGX5hray1mF0ORRoUcGg5h/CRFutirMvW1vVjMf
RPufr6vz9FXI9GHVqbcaxGGFkt30vyrRueMUhfRkEMovDc+mzlTidnazmJ8L
8b2wUY2Xw5Uwvpekz/CCiIfeUTKosxIlmV5uw28G8U760BPlhkq85vzk8DBk
ENdXDC+JVFaiiDnH/H7kICQzK9WSCiuhsemUnEI8MV72mUL9jEroCv8eLUod
xO7KSenTCZUobs13+5pLjNdni3zpp0oEf8j/qUAaxKDo9Y027yvRai14KaVm
EKpNEWVXfCvxqO9VsF/jIDhtSt80uVXC3eB4LlfXIOwYWJ67P6nED9u+Wrah
Qbxy4rvcbVmJyoj5ivbJQWiI7na/dbsS7L1ng67+HIS2ornm5huVyEgJ0D3+
exCMLfvu3FavBCVIYL6SaQguwcuNo+croRaw+6HUpiFEb3kk8PZ0JcQEuIc2
cA3hb+igzMThSjytvCL2gm8IWlMb15mLVEKU3tvY/sAQXnzi0Argr8TFS3TW
nBJD2G98dscIZyWakvrNPY8NIbadV8mQtRJ5MaXqpnJDqK/lfvaSrhKcyQNb
5pWGcFde07lzoQJ1lxhKJi8NIV1qw5X2yQpM0r/UKbhO9B+xtp1xoALPqjQr
jv83hL1bPDmvtFbg7gE+of2mQ9DwzNRWq6sA9Z3AjSzLIdR9PeJ+t7QC73kD
n+y3G0Juzzq+rKwKFB5e7/3XaQj5t0dd0xIroG2Qdc/Nawhp+Y/EaJEVuLrf
9Nzj10OwXGdnGh5UgeRlZ8azQUOI2+Mf9sGvAi5D7e+zI4bgcXSjfaZbBVKM
pHeHfR5Cm8Npc48nFdBcqnoiljKE5JqCBKv7FbjOb1AhnDMEa+32Kg5j4vt6
hn/+FA+hU+Hr/X6dCgR9jdzgUDWE6bf15JpLFah/M7DOon4IsneK7e+eq4CD
j0EbQ8cQTk6dfyF0ogKvgi+8fTgwBIb0En92iQrQyR6WvzoxBJ7ruS+S9ldg
aF63tH1+CFw6U+Jm3BUQknM9Vr9CfO9Zjnf7JmJ+wra9jWAYBtPbLzZPGCsw
sXWIzMM2jOp7E8aSv8phzJs+Rr9tGMc/qr7/NF2OqzKk/rc7h/HD7LCV8EA5
osxkSX/2D4M98suF7pZyaEpkBLaIDaMjy2FVrbYcdhvuQefIMO7dvRTeUFyO
VVuBjguyw0iIHxzdllmO78u8F0bODWPGtbTUNL4cF988jdRRG0aL5hHxiY/l
YC7onDp1bRhp3n8aRQPKcfiP/cbKm8N4bHlF45lXOYrqeXaTTIYRU8nV/9Kh
HCm5+7gD7w0jeuxDWN3DcnBl3xnlsB3GqeMeTnym5WhTSf3812EYewJkGCRu
lGPz3HEEeA7D7oqi4sUr5YiPFymkfzWME0819oecK0fMMs+hnsBheKu9lY8/
UY5tN1VsjMOJ517TN8sPlqNP0y5RJ24YmUeZfWP2lYPDYCtFMGkY7Vckf2fs
KEeWyzgpLGsYEWxjaTS2cuQdK0lwKxpG7+WnnMl05ZCmazPbVjmMWH5+zaCf
ZdigP7ODgzaMC3ELW5XGy3CWdj9prHWY0IfXog/0lOH7dYld5n3DeNbfprWx
oQx/rabttceGcXBcQjC3vAyOnya/fZ8bRoXW99h7uWUwGtaoMVwehr7nbmP1
b2WIK8hrV6AfwelhieG1yDLoxxsW1LKMwDpR4GJKYBkeibG8Lds6gq0+s5fE
fcowV8xzNZBnBGN9a6c7nMrQc8d8aMu+EfCUKV9+YV0GsS/Z5isiI8i9zfdx
nVkZJleVyL7SI/Crz/jgoleGrUZYv3xyBOoNupOHLpchUF9GtlFhBD5HJgQT
zpbB7/59JS3VEQSPJskdkCnDMEeMwgWNEVxsoeO7J1aGTzWKQlx6I5DNCGQY
5y8DLehAv7fRCD611K4YbCPGv8Lke89iBPuVXG/Fry/Dfw/2b161HsHPJZdb
MytkFNmfcVl6OoIXFh8TGGb//d9HVVeN2wh2xGW+Vx0kI7/29aYLL0eg9zlR
za+FDI0ALUmZgBFwMIeuRlaTcfPBTWFK6AgUDewXkgrIqL1Vt+F0zAgs7xh+
n0smI2RYtpM3cQTy8yLh62LI6HScdI3MGIHVuY05W4LIePo1eFdwwQjE7yuZ
zPmQ4TKT8tG0bAS/eKya1jmTsXyOZbG3bgSG8gzt7NZk0A7dQkUzMf/z2vvm
bpPBe2jxpnbPCGQ0lhxIOmRUKywal4yMIOmBymrNRTLaJxZuBs+MwI6Hx+Gr
PBl6cUfEdy6NYKNImajjYTJkfz2cYlsj4v+iVSwsRMarm3MusetHoape/KuU
hwzl1tY17i2jeBdqMuu/kYxbw4WWKztGkVLDHnCajozJ9cPpHntG0eeaMN08
T0JzIeuUk/Aocox+dKqMkCDwIoRNXXIU3uvzry20kzBibk5HOT6KIo2e8Je1
JKzvkRnNlh9F6hxO0xeT8OG2YpSayii671rtupVKQgBjwfncq6OwbSzpW4gm
YerIkZ53OqPYRQkj3wkiIct+QmWn4Si6jposVLwgoV8zIo79zijUwpwOrXMk
weps8XSn1Si2bjq976kVCdZK/Czq9qNoaLS0bTUioanbYbuM6yiSwiKDuLRI
+Oy9c7nsxSiEirm8jquQ0FmVXUfyH4XP5S/ScrIkPNpd/CI4ZBQHE2+fcDhE
gvNzZj6eqFG8dZDnDd9LwqT7xU/rE0Zhf8vDJYaThMrA+pXwNKK9vamwLzMJ
bAXFslvyifiuJDol/ipF4uOkB7OkUZyjbzmWPlmKUqXuJ3a1owjy9xMJ6S7F
sXhWmwdNo3h9J/SuKa0U7PsiteW7RiHnMypvSSqF3je7rblDo9Dh0biumVEK
Zuql/MipUaw0tPvu+1wKASZj2aMLo8h4+NukNrgUcWqD0eF/RkHXMbMn2acU
3mKGa3brxtA0fqTH0bEUPXx7Dv3eNIZfDiaSQg9K4R/dfWWGawzOReV2eYal
yEHH+Re7x+AaP/5NSLMUirPyQn8Fx1DQ6nKfolgKqcNxv/okxghflMpmdLwU
r3wuht+TGYND7AvXOpFSXLT7LmOOMYwpPaMI7iqF5RO6HNnzY9gg2+6fv7kU
615dYs+9PAbptTeCgnSlWDkeqhWrNYbd19ZbOs+XwGBJ2Eb21hiMnl9o/zpY
Aolq/qfxZsT3xuPXczWXQFdqu/XzB2PYPq/XbllRguWvqvKbn4zB3TYyOSS7
BEv5zmuMLmO45qwnmBNPtO/nj6v3GkO9lPl1rrASSPL+3a/yZgz5xtVP4FcC
k9FO/0PBY3hTc23ff84l2FT1q6Xo0xi0mThZVa1KwFvkxCgcPwZq8o+f1oYl
8FRh3reWMobJle+6AZrE+2M1XM65Y3ji/rbTUbEEUTvfrFqWjoGeQarFQKYE
mkbvMllqxhAuLiG5SbgEd4oYdZ82juH3eMHJRe4S9CVZzep1EuON/pnfzlqC
yvTduiODY5gZnXvgtloM9ks1mb2TY9AM1gkXni5G/mr/avKPMbyta3Db1FuM
rgKZ7eK/x4g8R9tmUouhx+m7bzvTOC4c+9B+o6QYF532MsVvHAf/bIJXWUox
ov7yU7i4xiG0T1byXmQxdDh2v5jbNQ6HYCs1zoBiuJ7U22lzYByqmqrOT92L
wbr0/qPZwXFkcXoeGrQpxlKFHOuRo+OIfRY/5GNaDK1EAdUvp8fByaPpNq9V
jO1CrI6+iuO4H9n4QU+lGMoZEp47L41D7tS9JucTxWhvVXfmvj6O0bef3nwR
LQZ1c7/h9M1xjFE3sXHuKsZx3W+8d2+PQ9FR2PL4xmLQnXxK1rk/jnVpH3LJ
K0U4JfH87HfbcdTskqz26ihC57E/8becxtHmmVlFySW48SETno9jyqJ3g0BY
EdQ8hA5XvBpHbsPA2NCzIuyu6dQofD8Oz2Z7wSz9Ilw7sHLDN3wconR1r9jP
FGHtrdYp5s/jeHz/6y7qniJseJ/ONpM0js5dd/ZFMxTB7duVFKfscQjI3g7p
6i+Eccd1jBeP4yfv+LfgkkJEh9woKqkcB6vYjN2DqEJoWX7iPFc/jtnG++yx
roUwbxvWO9o+DvVPLK5LRoWYvmZuR+sfxznD1LUohUK0jl53ODsxjgcdLb4t
ewuxZ/O5Rwfmx/H28U4lEcZCdCk/kE9ZGUdtxKnLDf0FWNoR+jeBYQLUir6U
sNICPF6VinFkncCRrES3H1EFuPODee8qxwS0eEvoP7gWIN+p02+EdwLbD05t
NzcqgMue2fqn+ydwJ6eU2eNMAb423/0zJjaBuMyFCpE9BTjGP8FbdngCj7zN
nZfpCiDtELtJVZZov452jqM3H76WhvM4N4HKJpYT2kX5uGTrVbTx4gQ+vIi1
FIvIh+ubaQM3zQmI9dstKzjmg+uM+qLZjQlsuhTK8FI/H7zrFv/7ZTyB6vbs
Z1yy+XC8GZy3eHcCfTwNWQ0786FcHbtW+2gC4g/KCnb/zoOH6g9uNYcJcHpN
3I5tz8NeAyIVHhPwpfeRvp2Th0M+1UzNvhNQ+TGQeDMwD1FVRXWKgROwkF5U
GrDOg21outeBjxOEzRx+HqWRh3y3Me6k2AkUCXU7vpfMg8Hazg9x3yZw4AGP
eTV7Hixe5ayzy5xA0u+S9a9mczF2OFBxvnACe4cUnrjU5oJ89+HjzvIJcDv5
qGcl5GJbrq/jfSoxHz+9lrd75aJy57b77a0T6PnFEsFskouurUGX03onsLje
6bzcuVwY7rrBLDM2AZrv668he3JxPo8/SWRuAk4bGc3OrOXA/76a/M+lCYzU
ptQ968nBlWO5sWZ0k7h3uWapNTcH9/wF11Q3TILZTYvONTgHvxkaxNu3TIK0
lSHzvE0OJtY7XGzmnoRw6fUv+ho5kNvrr/llzyT8rTkG2KRzsO7yiJSQyCQk
qlizqZtyILb1JD2n1CTCA/aYjk9mgzRaGxN/YhL2FD9vropslDRUSfMoTOL6
WpNYS2Q2dquXpyyqTGLgQJHZd+dszAzTMzuqT2LmkXIHz41s8G0+ffGR7iTU
Dl+6En4iGykXBuwVDCfBN5zDU7gjG9kfyh1z70zC0dZlbmg+C7td4h99ejiJ
pBOrT+/RsrBkXwfpp5PwuBnZuhyfhWPeuj9C3CZhVB+azeeZhSax0aCHPpNw
jrM48NkoC0MDqdt+vp2El94RNim5LGhIODoPfZiE6YXg7/t2ZuGon1epY/Qk
duRz0LEvZMKB4c/U3NdJ8G9LlQmgZkKAzYqlIX0SyzOnbjz/monTwgKrNwom
UWcaedzSMxMZ7S0918smsfiflUuFYSbehv+IF66bRMOl0/MFyMTQk8sXo5sn
we2YWxrFk4mAsfhev24iftXbHX8XMpBloai8f2QSSpo3p85RMwDGC8GvZiaR
xUSnJPQlA4KHLnXdWZyEzJWtE24eGXC2fPNz9u8kzktK/S3Tz8CJc01/B5mn
cI+5Y9T9ZAa0Drp8T9o8hXjp04eGt2dgTPRezoEdUzjyZv7Rgbl0tOVrW7Py
T0GuIsZltCYdp4zcGIKFpqBjepDDIzodf8IS3QIPTWG0fmgt1ikdB6bPTFvI
TOEywwaWu3rpKLrCJT6JKbiPW7OuP5KObOWxG+3np7ArxuGBGHs6BK6tGFpd
mcJyqij2jqZh0cb2ar/2FFh4i45mF6VBSGxeqvjWFLTvPi3tDklD9c+vo8rm
U9iR/neJ8jANteqmr+StprDN69Dtq2ppOFLmw7/lCdG+WfSMvXAa2C/Ounu7
TME5W3q3OV0aVEzVu6y8p1AsdE9jpiMVi4E/NzD5TyGIL3LoSGoqNnTS7b4f
MoUVT8lh/hepeJK28cD5yCnUq/p5xRqn4maEFn11/BSGmAISxk6lImJvJDUv
dQp99R/3VHGl4nqWmLVW3hROd1do35pKgZUB/1o1aQpx7v4VYaQUTIZzOCTW
EPMvu2nSMSwFbfPnaCeapqDwraZty6MUCHTYch3tmkIKXcgxFbUUtDRznN0w
RIxPIvzMQaEUrAxPK3pMTSFQu10m/08yHF5UnrT6OYXpO34ziy3JsD47wLT+
zxSuP9uW3/o1GdQtt7MerZuGttt5AUO3ZLx4OK53ddM0ikWVqsNuJCNrLKG5
lWsawrHfLZ9IJ+Psj3tn6vim4TursIuFLRlHOULehRyYhkjMh/FXlUkIUVxX
tFViGqYmhhFnHiVBf9ODjqWj00gfpzt5+0AS3o3z1DyXm0a3ielaOvUbpDoO
Rs8qTWNWzGLg5tNvEP/vjGX5pWnYF5Ha3cW/IeTXW/bzWtNoMVB4XdWSCFPB
kU/H/pvGpMmrDf6eiYgze8xCM52GZZXx0fuHEnGx6KHOmQfTCNR8LPe5/Suu
xN/7sNduGju9h+5beX9FxZe41ARn4nmE1pcz0l8Rdro/L9prGmIhcw2xfQlo
H3ZPtHk9jcgaOjOb1wl4Hmn6aC5oGon8Ef5yJxIQ8EPlYEfENMz4jafiRuPB
qWORd+/LNLYlUULpX8UTunlRqj1lGs5dFZeLZeKBfpeQtJxp3HtYUS868gWL
jBfbZEqnEcTkWWDn+wUb87g2iFVPY6tiyE27k1/g5amyZ7F+GlK6z6rHxj7j
8e38TRYd0xhtuzF56PVnlHVITF8amEZu9oWTR05/hqdR36euiWlQjz6sZBqM
Q6zzG+X2+WmwMyp5BPnFQSz1a2viyjRK9ZjYP52Kw/5fzLLijDPgiTk5YNYf
C/uGW/48bDOYDqIPWHsZi3MlywXJ22aw7MEwckEqFtbk3/X8u2aw297cgrk1
BvQ31lr/7J9Bwy71wVDXGDBsOJPmIT4Dpp+Pn3cIxsBQ2dX52ZEZ0P3ml1um
RUM47OAxVdkZ2KpUmwY8i8YtZu4S0rkZ5M4Zu1bticYSI4NcwsUZbA+oCZ2s
jgL9drHXstdm8M7Bsyz0XhSsZAurY27OwLRD5lvZ1ijIL11ZcjCZgdnjVxOj
eZFwKd+3vHaPeF/RyM5HPxJ7RX9OzdnMQCn9cIjE+kgciWTK9HGcgcDi2vz5
z5+QKOFk+tdzBgw2r/d1X/gEj8vLrH1+M7AYcrJx/BEBmnuqm8X7Gdz847r6
PCAC9pcsZkzCZ9B4/Apj9KkIeIv7nTkeN4O17yGybyrDwcY/Z56eNIMHEe6K
r1jDMRVz1T08awaxMk77arQ/Qv7MvPWR4hnUGXHvj3kfhuW536qfKmcQV51l
59keiq1H1293oM3gU/ZplSKhUIT6XslgaJ9BQvDhkCe3P8DTPlhpqW8Ge/3y
TYNSQtDy9GIxaWwG4WGVL9vWghH0Ro795HcivqpDzI5ywcg5JXmFf3kG1Fwj
jU/eQVBbuXX7G/0sCuq8KjjK3kNe7c39ryyzkLz37TL7pvcIThf7z3XrLII/
Hlg4qh0IY8l1Bxh4Z+HQLMbg9/YdXsn3dM3tncX7ureLLzoDIG6yaO4tOgu7
fO2vn7YF4NBHu95l6VnE3E6Xbbv0Fm8sVpTaT84iccukKSXQH7fV8twMz86i
+/DTx8WUNwghPU3VVZ3FnhmDBKdtb3D4UmyVqMYsHG2ma57ovQam2TOj9Wax
OSi3K1rwFeL3PAnwNZpFo/VGyQPJvvAy26u85+4sAnfmHpTmeYka8uGhF49m
4dy3yBzh9QL3MhQfGj+bhY+sufM2Dm+45gY2j7rPQuWwVkCL/XMsaoyKdryc
BRtvyHzuHw900z++ZvtuFky5218X/OcOEfIDs4mwWdwYe70sXemKJt479+pi
ZuFxMesKvaoL5j0iz+t+m0WG3+nd/+k4wdKjY9v1zFlYx/zqibn6DOrBzypF
Cmdx+eYK01mtJ4gruakeVz6LFv5zCgd4bXHDUY7yljIL+pEl0n8c1nC7rM8v
2joLMcFq6k8/S2w5OqYd1DsL5p0aa47bzPH7m5W7zegsdkUoIozRCHqnT3r8
niXmTzxBf7lNGzy3GOzml2YxdqOHy2+dCszv2q6trc1ia+32CfliVjmdhTPD
yi8B1TS24gE6Gn6d+Fn2zpyE13d3qZzyoSH5IIO12AsSnm/oc1QheKO177f5
eBLOPLzHde0fswbaTdaQULuNn/7f/aV381ZLVpMkbHqk88uIYIp4xPdVNjLK
Nz92/nf/6Wu2qn2WOBknwj7d/Hc/Sjzw0ZtoNTJeXT/tfpvgm2Wz+99ZkvHn
85PSf/erdijJWWx7TYboHQ6nf/evHnGzniElk5G7mOp+hWBbWY2Y6HoyKvmr
Ks4SzJvKE5Q1T0a2VbrsEYLP3M4/tbw6C6elHVkfWE5gV0qPlNrLQ5C7bPDE
ioj35PPkRiEDEnJui4jLEO39Rwr9LrmSYKwyf1mJ4Gc72BYsIkmQ1A/WVCd4
Fy9n3QKJROheXt4bBMvPeBhFD5Kwv2BjriHBzJw2Xu6MZNw7OtbyLx4Ptr38
9QJklAjcNf0Xr38TqwGnIhmlnE8U/s2H/uxOtoOmZDwK4D76b75yOu/ckvUi
QzGp3OFf/9HBS7cUPpPxIl7yPw2ClUTONKZXkaF84BbveYLtXlTO8U2Qwa9V
/eL4v/tqRr3tC8uzGFn1uplUpgDKI0WtDf4kaEfWe1wknodS2M2epJHA91E5
Tovg38s7BPobSQjMP130H8ETizd98IOEk5cM2P/dZwtUrNG15iSjeah59d94
G0xsm8OOkKFyIl7sXzzlWj0lR66TYT3YGviv/Y0PJNk/j8nY6G2179a/+3XJ
W20n3pPhID+mrU3wNfPgsN9/iPVxissqhk0EkcLcNdde8mO/1zbScSIfHYl+
HXM3SJDfarnxKNGe6WzYrluOJGTvefblHMHp4ypBwh9JeLzlzcC//Avs01ha
KSIh2uDMDr1/9+WmXgUX9JLg2SW28V8+Ip/3NiqvkeA7XPfgXz7m032+d+8h
o7sX/6u/8h/NyrXy/+pr5NX/8sGU+veXIRmLhf91/8vHC0H6zivuRH3NaNy/
SbCs7swcfTQR7yHWPE2Cv/Efn8gvI8P2xfN0ZYJjF/n56ofJSOHkiDhJcFT/
nPDPX7PE+khiLxpWBOr3D/P4kZB1RHu9KvG8KeIS27EkEuYWThj/u+/HxKB1
aYRKwp4/F4b/rafin6Yl2rMk7Ggv8/p3X1A652iszBYyONSmSP/GC/b+uHhJ
MqwME/7/vqHtly9TV8lIi7Hc9i/eG8k6klXWZHgE7Pv1Lx9Kq3Fzf9+ScW52
8oEOwTWj8VMrv2dhtCf4z1KFNO7MPT3oM0pCW+tO/X/x34lgPV28noxvVBup
f9/jNsy8SBYmYyri5f/q+b8MPLmhQsbxEPnxf9/jXNa4JrhEwmde8Zf/6mGl
/hZ7EjcZJyWPCP9rfzufjfHNcTKM73xk/N96OL6t45kuMT4L283/2vdOPL/0
9+8s9u37Y5G0kQffdvj8uf2SHdUCEkb/R9Z/x9X8/w/8f0sUSVNISGkpDauh
B5VQ0k6J0KCihUjREFERKhqiKA2VdmmPc06dczqd82ychkpbklERGvR9ntf3
c+7v3/Df/eKs5zmP53q/X9cbSXx9KNb/PcU8QUDS4Qf+aLB+D5/7I643CMhi
XUgba//HLCYmeJMIaPcOWVnW+pBPv3T/bzUBNU7+e8w6fnBMxu6k9hNQdvb9
Atbxxbs+dk7xL/74/guarM+fyVd/YlSKiE5qu1ixPt+Z0EqdTF0iUqCqFrK2
/8Pqm38+nCGi1A0HlFm/x4zxUQn7W0R0fs/4MGt93KuYeDf0Et/eq8+dWcfH
4cSi2ToCEeWLt91kHT9rcoyL3owQ0ZYlg3TW8fVDynWzy/j6SPL4kPHW9xDy
WxLOkb5PQJIL9v95zym+bydFcwnI29e4hvV6K8KujnxqISBf9RtXWOvjzY+L
J12+EhA3hXKA9Xk4fnxuXreaiM7Kp6ayPu8vJ3GhAhUi2j48/t/2RPM+fE42
JSL+RlMT1vb2Vcgo5vkQEZdTuQPr+3i7+YcyXzQR3e3SmmOtD94MDVF/fH3c
rF/gf/9pF7L+HkyOGyMgYuAxAdb62Pu+1vHVMiJKjElZxno/eulkCXUbEZ3p
qnZlvd8fA1mPvYfwebfNWtbfL/22nVKfJSAxEocp6/cmrxTf9ViciC55XhVh
PV5S6MDFuN1EtOzVmMR/5wfynxZbWyLys91sxXr8+jdrrt7E14fSmOGCFEUa
dZgovj3HSUTvs46+Zm2Pzhmbe13SRDQbFOf03/Odp6ym9IioTyHLnfX+zkHB
wdbC+Pd/z2Lo/H+/V7ZumjoRScl90WY93lEgZKRakYhCIrr/3+fHZ0/Q1hOR
1y5BLdacf74zIUIL/zzPOiZZz09TWtoWhJ9Pr4dy+ukK8KHGWW/H8PtLuj1N
K9VX4+u1zagkucmOgF5linuw1qvtCp5DHgEEVBcrco61Xh2Wlwv/SsTPn0bW
JJY3VnTl6vpXRUBHdrkeY63Xq+5rb2F9BKR22jyU9fvYOnitklwkoIVnryVZ
28tdbP9wfCP+/RN5Tf/7vMZvdz/dx/LBWg2szycV6zjbepqI1u/ZYsVaH+kf
pnefCcG3n8tAkrV+3rqPJ7WmENFIidk71vq6Yeuz0NBARNaCd4ZY65V692xg
3DD++6nrybO88Q0O3VF1fL0e8FjrnLLvMIp9GiEoF4kfb+e+/vf4wJrqO9w5
BDTprOXOej3+w7wqn2kEpOm5SZv1fpsvf8+68IWACuXObGR9nvGHpA/8AkQ0
5u8Wzfq85qsLDhYrE1GPxBO7/44v9JC40mNE9G9Qxo21vZL7+eVeeRNR1fGf
j1jfh2NR/NHVj4lI/L6vDuv7SuP9k6GJr1c3TOKr7vU9iOrJLf5ilIBilRZH
WOeDTdcSfWN4iCiAkvKN9XqkVRLntxni6//fQWXW+1+51rtP8ycBnY4K2sFa
b3mZU4duiRGRRSjXCtbnuVbZm5K4Cz9+6sVL/3e8fTjZZHiciCbd3/uyHv+O
j8m3D1+fVlETpu6fZVHlZ5764xxEFJznFsl6vzj+6ar3W/DtFaw689/zlUaO
fTiAf9+y6TdZ728saR9jKERE65oW2ljzqLPh5Qw1IsraIKnPenx12QaJegUi
kpnmOseaRXaFLVavw4/3fIFqrHmlsA/9gSYRHWLy/WE9Xy+SUKGLr8/FPpHw
MoowMjm9bdvQJvz7+yb93/ebWB7Ql7uDiCznE/5bP0Oe2tIpa4koKUNNijUP
llRadmwlIg21NhfWvNzp49sKJSKS8xQ4y5oPLmCdvRuIqLN4/ABr5qVpxdTi
7ydZ0iaYKDCn+6tAZzv9/nddmVyVdcvx/SFd8HHdfnx/SFXVkWPtDx/ba/2+
+xNQVWvKDtb+8Hpoc4YHvj/8e7/tCWt/2H7E6EYQvj+89D+9nfX7qr7pzrTE
94crzX8usH5/Wk7fk9gFArqh9FeA9f2q8mUpuOH7QzzacJT1eYTzMjQE8P1h
mfwchfV91NgwLxvj+0PYJpPz/x0vMw0ah4OJKFm1bO9/51u9j1FH8P1hR9Xo
EGv9Htlj9k8f3x/ov7eIsI7HZr5fRgTw/WG0Ys6VtT8YqW5+K4zvDwn3D9XE
vTyMpB0ND2Th18u8S/75rP2BFC+7PiCbgGbOTyLW661UONbuju8PvUUaUqz3
e1+Yj33Dr5d1vKf4WZ/nxAd119BV+PXiybvhrM8b6PRvYBe+P7j45NmztsdQ
PSBWGd8fIvLJV1nbW8V18/UGfH8YKm7JYn0fVTcmex/h18ucpV2nWN/Xpd3v
fdbh+8PmzxLWngf2ojtviTpb8P2hc60Eg7U/RJOWL63E9wdKfO8w6/VyvIWc
n+PXp082/d7Dev8dZUnOVfj14H3B25tY61v696nWefx68KkRNxfr86StUdCW
xPcHDstdcv+tlx+jxGr8evB2hXcY6/FhmmXtkvj+sIw5/pEvQA6paF4ywvDr
sUej6oGs9xt82Gdsja//7A/9Yf/9Pu5kyVr8+ubolshm1ixcESOggK//ro5r
hqzXDwv9cWc3vt6J6lPbWfPe8zWugvh6D9z56S/r8WsqX9+WwtdfWE/d3T2T
Ysi/+HKdI77ezyl327AeT15NuboDX+8WPNYWrNmqOjNbAl/vO7ZM/ne+eXdE
94wVvp7jIoR1WTNzQfJUMv56yg9b3gtQuVCnw+pZF/z64LoE1Zz19zLlTtnq
+Pm1Isbi+H+fJ8mWMoA/nloZuvhdYEKX3ffi+L8/7Psv9mxOsqgUsWb+3zyF
qBk85bbWJJj/vx8/hezGjn9/+v/xeLaXX4pZZn3C+CN4+dfvtwep7PgIXr4m
nIQ+iHwEL//wtJPtw19j4OW1r7TLhPaOgZf/5O5GCakZAy//pMJUvyR1DLy8
bL5sc0H4GHj5sLVCUw0eY+Dl57r7381YjoGXf7NduADtHQMv/yO+67zFxjHw
8ve1pM578YyBl5d1NSgrnBgFL8+XW8HzCxsFL8/14uWFz+9GwcvbY71ZAsmj
4OV3CZ7m3Xx3FLy8X1hyhKvHKHj5qbXfPc9YjYKX30XxKd6zbxS8/BPm6w0m
MqPg5Tte+I5qCoyCl797tJ+n8dcIeHnSTbXyuA8j4OXjbp3x1SCPgJefyv0j
siF/BLy8fgxvESlhBLz8lLQAWn57BLx87YUDD55dHAEvvzL75PJxmxHw8pW/
AgUj0Qh4+abrHv4k+RHw8uIPdDuyRUbAy0+00XZPLw6Dl+88sa25b3wYvLxR
laC+ZfswePnQXxUdKtXD4OUbb35kpGcOg5cfuzY4dy96GLw8M2/H4OyNYfDy
2DkCNus6DF7efV1cnovlMHh5rCipxQkNg5ePcDR/3KkwDF7eM7hmH110GLy8
4O3518acw+DlHd+ErNH/MgRevvDktt7K7iHw8jethTrySUPg5dXvcPXIFAyB
l//wrbVQ+MUQePlI0QxqaPgQePkDp520fHyHwMtzye5Tb3UcAi//NNt5T/mx
IfDyM7+0lq/RGQIv/7KQXNCrMARe3nViakpDfAi8fGaN8ZWf3EPg5Rde8Joe
nBoELx9Y6TU33z8IXj6Sv6hpC20QvHyD9Xm1/neD4OX7DcZP/U4fBC+/kDWb
lxUzCF7+9lk+35bgQfDyESqb1xp5DYKXfzEt8cfx5CB4+YJ1rXmtRoPg5T2j
LtGyNQfBy3sO/eXdJjcIXj75zSxhSmwQvHw2PbPdgXsQvPx4+Usjn+EB8PIP
/B7crqwbAC9fSwrstUwaAC/v99fR66b/AHj5zXbC6gvWA+DlDxin3DNSHwAv
7/f5lfUWoQHw8uqdP89Zfv0AXl7pfcHn5bQP4OWDf//5HZr9Abz86empf2fv
fQAvv7Su8GH5+Q/g5S8JLLz2M/gAXv7YzA1hDukP4OXv9gob/uH8AF6eGVEc
5DDQD15+0DCNU622H7x8tNK59w3J/eDlnbfXjZBv9oOXn8i2UtVw6Acv//7Y
YZK4Tj94+bHdpNCK9f3g5aNoS0kVC33g5TU7fy9qvu8DL19yYjJTqLLvf15e
r+aaR0IfeHnuiqSNd/z6wMuvUg959NWuD7x8LoUyOLC3D7w8k+eQ7Kb1feDl
fWdID4QXe8HLczqeO/iktxe8vGu0BL9DdS94+cjmsWcVSb3g5WcMm7fSbvSC
l0/7qzMqeboXvLxRXn49L+oFL7+M4mOzfUsvePmKmaT+Je5e8PLJdjkPfUbf
g5e/aPwqS6LpPXj5bYJe6xwz3oOXLzmolNAf/h68PEHrNZnb4z14+RzCZoVW
k/fg5T0rdkVTVd+Dl8d+H1T2EnoPXj7CctqgdqYHvPydC3S3XZ094OVrBeND
7Mt6wMtnGlTFpiX2gJe3L/20e0dsD3j5axsOaYlE9YCXP7X1zAaHez3g5SNo
Xz233+oBL3//I9YidqMHvLzIlhrvc1d7wMsHCGWt1fLuAS+vtSdpt697D3j5
a46mHBrOPeDlY4nRcysdesDLXzgV2XbUtge8vFSo3kdBix7w8l+eOqzWPtoD
Xl59vSsjxLAHvHydztlTRvt7wMvnSiW4BGj1gJcf1vIdVN7ZA15+2H6KvqDc
A15+3C86RV2+B7w8R33o5c9besDLh7yadFgp2QNefjj0ofxh8R7w8qNOrreX
rekBL08ZIZ3ezt8DXn4qdsGnnbsHvLy0eoXm6N9u8PJf5lyWCf3pBi9f7X0g
rnq6G7w8XUT8UMdkN3j5d9HXzriPdYOXVx+7dlxyoBu8/Ctznu69Pd3g5dfM
M0062rrBy7fN94e+p3WDlzeY6+T529gNXn7isSjfi7pu8PI2JXv3sNw428uL
PBuO2FncDV7+jnoFV29uN3j5MY7jQl8zusHLtxrRGDdedoOXP2Zqd9LvWTd4
+WCZXM3p2G7w8tLE9LNhUd3g5Ykzgo1373WDlxdW/8TNe6sbvHyWgl7pVEA3
ePn+Lqetf3y7wct/t536GeDVDV6eOeGecdGtG7w8yW+tQ49jN3h5ckh5huPJ
bvDyit/nDtjZdIOXvzeScr7ZtBu8/P2tGeLZR7rBy6toS1Mz9LvBy9uNx0Zv
2tcNXp6gKmOxDN8utpdPHTAkuah2g5fXq30kOqLQDV5ef5GHRt/aDV6+QJZc
tXNjN3h5I4acKd/abvDyN5UF3x1f0w1efoBzmSyBrxu8fDevavpz7m7w8p/N
B0KmF7vAy88n/Msu/tUFXn7ePfnYk6ku8PL8pYpt3ya6wMt73m8QfTfSBV5+
6aJhx1xfF3j5c/JDw7adXeDldTbel5HHusDLby2Mc/GidIGXL3dPF5UjdIGX
tzmQd2+xqgu8fJATR8iR0i7w8oF2VnbL87vAy1tdKTXTyeoCL2/59L3T8Ksu
8PLVm6Nc0pO6wMunki/zDT3pAi9f3Jet8+BhF3j564ru2Xn3usDLlz2T+/A9
pAu8/AZ7w7WvArrAy5cWcKykXukCL5/MSDzg7NkFXv6tvUqJpGsXeHmftB/O
Rvh+y/bylC2JtM8nusDLF8kFruCw6gIvfy5d30bDpAu8vO3YtY4ewy7w8urX
z6b9RF3g5c+fmh+6pdkFXn4hu335HfUu8PJG67ncXyt1gZc3qZAo1pTtAi9/
QpTb8YBUF3j5wwbfd1Wv7QIvb77xbMNxoS7w8sM/yKou/F3g5e9YWO0b5+4C
Lz+kvrK+d7ETvHz4mT/Yt9lO8PKFDYz5q/hxk+3lf2aVifl86gQvH6nsET44
1AlePpBr43Kv3k7w8gpR9jOeHZ3g5SVIq/NHWzrBy0dGKnk1N3aCl1e6e3O/
fF0nePmeEZHDaeWd4OU9VmQ2PyrsBC9vZk/t+5HdCV5+656di41pneDlzdZa
yJTj5xG2l68vFbOTjusEL1/z5bjwwsNO8PIvlNokjMM7wcuXbZTOqrjVCV6e
p5CxOyGgE7z8W4XUqO9XOsHLax8ouVLs0Qlefs3Oa6Xx5zrBy3+6tF5/9nQn
ePnHHRfbam07wcv/rFr+jcuiE7z8bh6pTy74eZXt5QNzeU/uNugEL89dW/c+
aF8neHmbqVrH3bs7wcvn1w3sObejE7y8OiN4Xal8J3j5B7l3r1/a0gle/vbx
pfRM/LzP9vLR5m8GjUQ6wcsXIIffq1Z1gpdfS6k8fWRZJ3j5TXN9BtN/meDl
jbw7akR+M8HLz21TSrKZYoKXXy4T78YzwQQvn63QZaI8zAQvb5B1423deyZ4
+Utf3PWutDPBy/P6bLqcSmOClz9t9DlKh8QELx/8816keQ0TvPyAcddfBn7d
xPby13I92jzzmODl268XCkZkMsHL32hX3rH6JRO8fJrsycXViUzw8ld9u0tU
Y5jg5WeejNZVRDLBy/O77l6qv80EL9+pLSOhdpMJXj6vf2iyDr8OZHt5vQMP
btA9meDlPXnOW+ifZ4KX55TeqLT7DBO8/Pjym0ZGdkzw8vGlAZIkcyZ4eeur
uX41Rkzw8iXkX6ul9Jng5e+mnLq6qM0EL+9Z9MB6cScTvDz/gNj7s8pM8PKx
JI5yw21M8PLqKjMNj6SY4OXLT1UKLYozwcs7JJ8+PC7IBC//6bXDmj0rmODl
Q5vEVyzHr7vZXt7a43THn7kO8PJ/OAyfHcOv09lenuzFuVF2sgO8/NK488bT
Ix3g5eufvqup6O0AL69w6cCbuI4O8PJCXcV+XbQO8PJaX9Xfx5M6wMuTippS
qqo7wMt3B/tpcZV2gJf3V379h/K2A7y8/mPs5o/0DvDyar12PsnJHeDlD5Jq
mz3iO8DLP6Ossnj+qAO8PGd1HdM0vAO8vGJr6zKnkA7w8pJrY8/HX+8AL69W
onjC/FIHeHktjQ+27u4d4OWDsSMay506wMsfy1JkNtp3gJf3lZ8dG7PsAC+/
pveSU/jRDvDyOb+j6ZEGHeDlpZz1m/N1OsDLO/2SoJ7Y1QFe3tp5k6gTfh/I
9vIXinfmTMl2gJf/bqazqg+/b2R7eS4LAfXPYh3g5TtfRe4LXN0BXt55w5qL
Xrwd4OWtNxm2fPzXDl4+xM4oKuR3O3h55uJdzO97O3h5/11x73+Nt4OXl/iC
DWID7eDll3FbCNK72sHL77E6lWyBtYOXvxp16rY6uR28PFPtr0RiXTt4+Wu9
/Jdky9vBy48+5bmxsqAdvHyAeQvtelY7ePnL0s8O6b1sBy+/PMTDNiahHby8
NfG084rodvDyfj+oPzrx+362l19oSylUudUOXv7d8NyFgevt4OXbVuuMF/m0
g5c/dYdfVdi9Hbz8D2ntJvLZdvDyvMuMbvCdaAcvf0NyOMbToh28/A/zBTMl
o3bw8ucZgU2X9NrByyfuemkrpNUOXn7NkcPCHWrt4OUdH5fISiu2g5cXr9Z4
3bilHbz8bbNJxq917eDlU8Kze24ItYOXf7mrVV+Orx28vJLR5MIpznbw8mn7
qEMTf9rAy5d9MnDlmm4DL5+Y5vUTTbSBlz/h48XRNtgGXj4lcKvJdHcbePkI
61cRzlgbePlVP5ceLza1gZeviNkUJF3XBl4+4fe+rGdlbeDlQw1/rErNawMv
LyKpPMzIaAMvn6m+qG+a3AZePmKpPuRUXBt4+f7x5ZXVUW3g5UlqVrK5YW3g
5VWja7UbAtvAywc/C0mUv9oGXt4gQJQh5dkGXv7h5cx3Li5t4OXR/dw1bSfb
wMt3Vbt9olu1gZd/4jRVueFoG3j5F8f9XOb028DLX0/kVPyr3QZevl/m6U4z
jTbw8hfHbap2KrWBl79/Mfvneek28PJPQz356te1gZf/q1F5KEeoDbz8PZdi
/7EVbeDlRzzrVQo42sDL5+w08Uz90wpefuUK2c/D31vBy7fnpT8qGW8FL694
srW340MrePmEVTfe3O1sBS+/7knTgbP0VvDyt+yuNISRWsHLp5cRLu2vbgUv
LxftfelgcSt4ebu/avPe2a3g5UfXiTqppbaCl09JzLPTSWwFLy888TCy73Er
ePnZUPJcangreHlH86I9JcGt4OXzX0eePunXCl4+W5RecdSrFbw8359Pa5zP
tYKX96sWWCbs0Ape3uu8pOsK61bw8uHfcohPjraCl8954zjtrt8KXv6zuvvx
81qt4OWHMmgeC2qt4OWF0/Pvd8q3gpcXWtn87sjmVvDyj8MmukbXtoKXby5O
0G5c3QpenueF75n9vK3g5X0na+U5/mLg5UeGfFLGf2Dg5WMfj0a7TmLg5cee
yzioDGPg5UtITlxRPRh4eRR/S1i8FQMvz3c8eudwEwZeXu7qwY+HazHw8uuj
T/L+KMHAy78RqBfbm4uBl/dbym97nYaBl09f9UfD5hkGXv7Z7MK+V9EYePkt
bsqGquEYePmP9RtLPwZh4OXVK5ZHaV7DwMvHMLbFtHhg4OVn5U6e/eeMgZdv
Kr9tZ3sSAy8v87axYMYCAy+/ifPkQ0VWb/f/vPzcUXuZV/sx8PKTVj5Jensw
8PKJc0v2ISoYePlMhdZ//2Qw8PIkkQLjDZIYePnZra6YrzAGXt7e3zpgbgUG
Xr6JdO0J67/XYnt5ud7sTfNfGODlkxz5K+ffM8DLH2jS1jClMMDL+1ASiJKl
DPDy1/zJwUppDPDyOUHL5gseMcDLX7ySUx15kwFe/unAbZ3MCwzw8ph9ZIOW
LQO8fH7hGsYaQwZ4eTHdR1XaOxng5UtrPbh7NzPAy//unjpRu5oBXl6g2OKN
+AIdvLygVGN30Sc6ePlYpwjf9E46eHm0/bg1P4EOXr6kKyitJJ8OXt5V0oeB
JdHBy48nebTuD6eDl5+3zByYu0oHL3/Gp3rZFic6ePkdT0v4os3o4OU1Mn/f
tdOlg5e3Irs7PlCkg5c3tzxSsEqCDl7+T9W177+46eDlBxOOrN4z1QJe3kN7
xIDY3wJe3mkHIbmC0gJevtfKdvxfaQt4+ZGEM+WJaS3g5U9ZCH19/qgFvLyJ
+sk3UzdbwMs7uxbYZLm1gJff9rLXudCmBby83lrLxyIGLeDlWyOJw907WsDL
k7W9NackW8DL3zJw0HFf0QJevsyQVKP9kwZeXv34qt9nhmjg5cUEEzjHaTTw
8tyjec/ry2ng5Y8o3/OeTaeBl1dqPWpwL5oGXp5UlGnpE0QDL6/VvHuszJ0G
Xn41p9yq4zY08PJZZjrbjunTwMu7Zk0NpqjQwMtLB//0OLqBBl6elnxN3IKX
Bl5e98rdyfzpZvDy3ZJXzd0/NIOXX/dEeyKA0gxe3ulR3M9PJc3g5fODRqbz
XzWDl5cS1d7PeNAMXn40+W+5kX8zeHmzgtNz612awcuLmjSEHjRrBi9/XvbE
El2nGbz84aWfx7LlmsHLB62Tuzou0gxeXvWsUEkQRzN4+Q4x9wHXSSp4+WfP
jqQUdVHBy7vO1lSYNFDBy++yqrc2eksFL//1gUBmaiIVvHzjLSknoztU8PJf
t3Y7W/tQwcs/r6nZnWNPBS+/9HOPyGlDKnj57rlRfj91Knj58IxA7L0kFbx8
fIN8ctoKKnj5ky1CVrSfFPDy1B1f+rUHKODlx0eddEWbKeDlpWb8OtRLKODl
E1w0X75NpoCXVwro3fwkkgJefgazba71pYCXr8oJXG9zlgJeftFa/JuKMQW8
/P5tYc9cdlHAy3sHprTybaGAl/ce8/X7xk8BL79eNuv5gV9k8PJWpQL3fg6R
wcuLrl/oHmsmg5c/nCF751AZGbx88G2Hz2MpZPDynA8WHUYiyODl9/ZPr7e8
SgYv7xNgfvnvaTJ4+XurOldtMCaDlze3NclK2E0GLz9lq8sw20wGLx9pobDh
5koyeHk//n7twZ9N4OWN016np35oAi9/Spuk9IHSBF7+59iX0yZFTeDla3Tc
cna+aAIvL/uscPLY3Sbw8nPZMpup3k3g5b9uCnWrtW8CL98n5XJ1zKAJvPyh
lpOJYTuawMuvOl9fFrG+Cbz8VYrN5WruJvDy13xUtD2+NYKXH9Z16z/S1Qhe
fkEnsvxeXSN4+YsSahmG2Y3g5X3lT+/eEdsIXl7owYv+uMBG8PJSJ1qbnd0a
wcs3zfRsP2HRCF4+SiE9tVWnEbz812W19V6yjeDlL+/w4Xgs2AheniNITXvt
PAm8vOIBbLR+mARePrVRqWSaRgIvb6w8stmghARefmByZ8P8cxJ4+YLS1S/3
3iOBl19R/ID+1JsEXn6F77IjN0+QwMt/TZlYSzUggZffO6v0Y6cyCbx8VniA
ouJaEnj5LdZ3o7WXiODlT90WuVM4TgQvb2Ze96OklQheflm+ik57ORG8/Mas
YdHAVCJ4+YQoi5H9kUTw8sG7Q2fdLhPBy7v77aiXPkUELy95e2nztAERvDz5
2xpLMxUiePkviQ7zayWI4OX3J01/mFkigJffXylZdmaCAF5+/7u/AwMY4X9e
3qsop/EdAbz8qrnZZL1XBPDy2wwjr7WEE8DLBwc5xXy7RAAv/27vxajrJwng
5dfqW68SMiCAl7eP9Jrbr0wAL586sflKgCgBvHy+f0Cw6d8G8PI6PXdUoz42
gJf/++k9J7OlAbz8pIBiQllpA3h568SnlinPG8DLu5sGds/cbgAvH9vy023E
owG8fMli37Muqwbw8pNhC5wX9jWAl9+h1h7ivq0BvPxSc57iBYEG8PLpknKG
Ar/qwcubvj4c+ravHrz8c+6lxQpCPXj5FPoJrQs59eDlmY/Xr5SIqQcv33bl
Cs0toB68fN2cloyCcz14+cc58feHjerBy+8pPKCir1EPXt5AlMR4tq4evDy/
17O+JM568PKn3t05tupzHXj57QJjaj5YHXh5Hd6j7cHv6sDLu3R9bg59UQde
fmqrhMHP23Xg5b16TgwKedSBl+9b90Z5s2UdeHneG5mdfVp14OX/ONp48m2t
Ay+/TKNQUoavDry86IXIFQNDteDlp/naq0xya8HLe2hN+yderwUvr04UjzI5
Ugte3vAX/5Z20Vrw8vJDL0LrR2rAy3svVfEFvq0BLy/G8XT/ev+a/3l5fUck
c6QGvHz6JO/IL5Ea8PJ2Dns7NIerwcsvaKuFnC2oBi8vdCXu4tEb1eDlt5j6
388xqgYv/06v7HqzaDV4eX5D/n0tA1Xg5X8dZxoceVsFXr7z+a/gQL8q8PKf
/sjGqBpWgZcv+OL1gipaBV7+TFTHKYmBSvDydVN3psdzKsHLi777UXjuaiV4
+TCXhDE3/Urw8uJH3dpthCr/5+XrK6y+vq8AL+9sOmovkFkBXn7AfOREm3cF
ePn5zWclg7QqwMuniM69qlheAV6+6ZKvxROsHLy8dX6MN+fzcvDyKgzxtBPu
5eDlu64LGJtolIOXX/hKf9C59A68fMi2j49/Nr0DL+9hw5v199E78PKa6G3x
q1PvwMt3fbR62in7Dry8Q9cP6azpMvDyNdjPqmXlZeDlOwce7TYNKQMv/+zO
HpqOSRl4eX/78+ffipaBlx8IchpqHCgFL7+ixaKuNbsUvDzTUL3sxOVS8PJ+
fNcnH+qWgpe3kzp3XHdZKXj5PCcToX5aCXj5xYE7scrxJeDlWyWfKEw7lICX
74w2s3VTKAEvf6TioW/Xz2Lw8iKk1wmFlcXg5etO+2OHworBy98peCZ28Ggx
eHkvQYrcbpFi8PJWBZI/P/YXgZeXpWlHzKUWgZePjqC8o3sUgZe3e+2dwqFR
BF4+9mGnlvxcIXh5826FHRKEQvDyhHnf6w73CsHLR/9U4vM2LwQvf4PjgvTN
DYXg5WWOSRm9HywAL/93JthlxZsC8PIb2vldQjwLwMvzzpwt/aFRAF5+2n6k
R+dvPnj5/FOcDtT6fPDyqYtX3qpF5IOXF7jfZxBvmQ9e/kdOZIeORD54+U21
Pb9C6vPAy8u/EHu7cDgPvHyX/NFUre634OUtRVaq33B7C15e/WWBpPR0Lnj5
+XNf1yQE54KX79e8mObGmwtePlfXSmNvVA54+VIO0sLIxhzw8o87orp7U7PB
y2ve9NpYppYNXp5/1Lsiqf4NePlak3/r6w+9AS9v/f3hZAczC7z8Bc0nkZIn
ssDLS4QFtbgNZoKXT9u3+luhZyZ4eW/Ob6ukf2SAl9dSrLWNCcoAL2/HvdNv
E1cGePnozNzTJWHp4OX3MwM3nhBJBy//cjAmfuXT1+DlN/WtsGnb/Bq8/GaC
QlFebhp4+RqTNT8iVdPAy49Xfp4Nr0wFL+9vrHk1QCcVvPwlskhuYO0r8PJ+
N69G5xu9Ai8vmZMe29T8Erz8syNf2kSsX4KXL4q/MBw4mAJeXq7tyGTd2RTw
8mrqRqPhncng5RWOUl7KM1+Al2/uZxTZjj4HL/9mt5ox43cSePnbRzmra389
Ay/fr08Mtud9Bl4+6enO83acieDls999fRLDkQBe/syt1T9i1sSDl7esnrzd
vTIOvLzHYsTo1Nqn4OUFT+pTz8g/AS+vszh35ffWWPDyLfcnr9xQjQEvb6FP
4FojHw1eHtNdfDm19TF4eROjU1y9qo/Ay5cdKm1wN4/6n5eP420/5nQfvPyx
6Nf+Q0YR4OU5Tdqubta+B15+IU8oo9EkDLx8p0qMWP+u2+DlNYqTV1/bfwu8
vKia0fJflsHg5cU/t7eZXr8BXn7LQ0kxhUd+4OV3yU3ocZtfAS//dW8KJWCr
N3j5B/TXQ2XXXMHLC/R7Pf316zR4+XOv3lzkXmsG/qJoTekAy3G4H1cwph5l
olNBCyf+Zvagyzl56Q9PMtGXbYqmS097wJsnTmbe4V+3H7/ejwqtNiGB99A7
5PiNfpiJ3Bz765Xye5BEdJF1pi0T/dZq0Dgf3wN++7rMPQl+mcMo5vxUBsmM
iQKJqkexlz2I3pj9++oZJqqa3mMW96QHPPVpr4YBwfWqKEJWyNbvyP/eT6X2
H2o1ZKJHgTFXCUU96PPtXbnFNkzEe0ZZckNCD/jk46tkMHmFoyhw4P5c0zEm
+mWanHnudQ9KKVc2DXVgoqbARQtjfPvYXliE54yO5ba9yJl/ZR6Xxf/ezzBZ
7d+zE0xEMaw3KIrrQZnfLW0IFkz0hxh3UOtFD/heN4ugtifrNyOrHIsG60P/
e77MAs217SAT1V028nlY0oMsA391V1gzEX3os4Av/nnZXha7IP85WekYurLB
XppiwkRaaqt/q2X0IP6ib/7hp5goR+Gj+Wv887L96t4PVCuD7TpI5fHRdYOm
/3u/vPgZhVd2TPQgWHSfAP79v1CSDiKaM5GxqJLuspQe8KZ5BVxqAXLyqO4F
42ui8f+eHxJ5JeTtcSZKDKHK1+PPTwylGMha/e/vC4vuKDdYMtFB5mVHr6Qe
8KLU9q4DA+vXIKl1O/9a4Nurr1Nz1be0B7E9kMN8WJ5gYg94yytPBM4zt5si
L82G0iP49rq+t0pfi6+/mh2MR6vw7T3cX2XWhm8v2z8ecFKvUt2hi5zF2pEs
vn0/V6Xs1cI/X/yRcJGD+Pbt8A5q+IxvH9srzs8LRzOVt6PdK6zj1PDtkXqe
L/0Nf3xu65d6Pfzz7xWybbV63gOe0FbgcaaYvAR6wSlO2IOvp8bm/WKH8d+H
7ZfO/ffnIyp7IpVwwIqJxAo+/wl/1gM+kHeb1OCaDRxIMvP8IRF8++87BAZ8
wrffUbPp+hL+eMVE7m078e1n+7qa+NCXnrmm6CJ5loMf3/6zcotBEfj2S3jW
bqDj+59eHgf2Cd9+tncLFCd/TFVFqMaSQP2I71/ZprqlZvj2PO2uOrUM334D
35ywU/j+xPZphumaeYuqKuiR4UHpH/j2RCncSObBt+fNmc2ruPHtl7pKi2jC
t5/ty/RklxWnqUiiP4j32Bz+e7lzpj52wB9fLGMxwol//t0fuXMX8e1l+7HK
AwSal/wK8FuDkkULIfjj2V4sRE8qQH/DlK71f3+Y6KTTYXeePsb/3+P/f9cH
+/GpK58zyfjfs72Z608pfPVhyC/uR43hfVNUcrGwhMiJoYX0edE/XmfQ6eB7
37K5MSTdRLuOXXBFX1V/3/FahiGfdLs08iZvZO76dbPccgzlSB/PjnG4girv
04I4+DB0kS5V2GXlh7heHOdk/Xt394q8bXlTbqCneneyolZh6J3Lx4TYC8Eo
LWdM6sRqDHmGX7877HgLfTjsEsi9BkNtlFbi69u3kflTul6LEIbmtgjekr0V
hhzStY/7imAoLKbVLtn3Hhq48oZHWAxD9VvsQqJiIlC4m7g9XRxDNU0kea0H
95HOpop6NwkMuUX83mRfEIVsu0Z3y6zH0D6NLolKl0dIZypYsH0DhuSUXw+l
n3mMMprHKs9uxJBribVFi3c0Uve6+W71JgyFU/5wtXnGIEVuwpdnmzHEdTHQ
XuhWLNpHiuoylMaQ8jPDepNHTxCZR8zv41YMadtwnne9/xQpRtULn5fFUEry
i+Lq53Go1Sc2nUcOQ2NXVPSmk+LR78bRuFB5DH3o5OjfEpeAGm1Tl/1RwF+v
qWTTg/RE9LWKWHxPCUMO+qdedaY+Q5zTIzcWtuPPNxmnnShNQl9c7b+Hq2Bo
81gRTx/hOUpeepEloIq//4rLN7RrXyDR6BLtK2oYelsumsRkJKM8y+nqWXUM
hQR0/N12PgWJ7vS7fmInhm4PouKhkRR0/3UdKtmFoaL7STWaF14ix33+BxT3
4L9H4Myn4ImXaGVC+M7QvRja+E7zvMulV6is7hZ9VhNDtnv8l2nOvELtDxkV
R7Ux9HXRXjHSKxXt+am8lKCDoVy+Han+v1ORXPat3Ry6+PacXNC2u5qGmHG2
14wRhrR+vZNnLqWh3DqdtXn7MeTduTaJEfYaxcW59q7Qw1DcoteOcp50lFr7
yOmwPoYm3MrF9z9IRx+1TsYmG2Bo+8bFjaWrMlDhlrOf+g5iiCw+mP0mPAO9
q9i+SegQhh4dL3mgI5SJrHfeMTl5GEOHP4Q+rH6YiX5957WMOoI/P0d/rFci
C91VulvTaYSvl7q0er/kLPQ7MKNH7Cjr/19equbZ+AZFXN4eqmOCoalKo9Uq
r98gMbR+wO8Y/vlTHwYaymSjafxrfW6KobxWkt5ibjbyvnDkUacZhgINnz9Q
3ZWDwiLuzPJa4OuP0/OPZVEOEp7a9neTJYbkuVXLRHVyUYrDwcsmVhjiMZ58
QqzMRdi+H5+crDGk2XNoYWbvW/TI57PoJRsMJb59UlxT9xaZoxTO2OMYmqT0
PbiO8tAelWUvkm3x9btdrLKVnIdst5y4WGOHrz/3a3s65PLR3oP3azpO4K8/
fGZL2bl8NEpsu8y0x9C/Rb2ST2/ykVo+4c0n1r9HW7Gl5/HnfDT13DHl4ykM
CUqa75+XL0DWh8Vb+xwwRNh83bzgYgG6wKffPXoa/73Iz2cGsgvQkS12xt1n
MFQoUrnv1FQBqitRW9F/Fl8PnEwJC9VCtLhyz/0WRwxZx6A9vF6FKMfAL6bU
CUMW5FdLK4oK0W9jima+M/77pHDZhs4UIrmeT5ZPXTDUvsH+xNE9Raijihp8
/xyGIrV4Ujr8i5DAra1L/ufx9b6Y5dtRXoQ28ii/tHHF1/fZw7PS/4pQ4ERp
5gE3DNW6jfBM7CtGfGo1yuvdMaQoxjjueaMYxcb2lE3is5JzkZVeXTEaMJZZ
ar6AIRmb2KEHS8XoVVyPR+JFfH+Y9JCQNyhBXfPOgtc8MOQlEx8dcrcEeVWT
bh/1xNBWjtoki8YS1JNeTV/jhSGPoA9ml/hLkctkasowPue9nI/lMypFlz/f
S071xpDU+fOSZ+6VouTt4lsdfPDnYzSTZbRSZO90557sJXx/7lMRlF5Zhu7k
H23ow+eiyHD/B6ZlaE7qunXKZQzpfhj09X5Yhh5obxWzuoKhX+33ioXpZehF
MOUFpy+G9D0UnnMLv0OX32/pq8Dn8KxGsYvm71BfSf8X56sYcg4/uXfr03eo
3GKdwvpr+PF6lf6LhJ53aC31+T8ya1bfFntXohxt35Rh7uaHH+8WOXcST5Yj
TP6DnOh1DD12fe/kl1SOVKZ92vLx+agfd9fk+3K0QOUkHvLH0HMl2Z+5UhXI
U03hySd8/hii/3L8VAWqrVUcCAjAECngxB+vVxUoWtfklsQNDLVKNESXjVWg
vX4qOnn4zLTdVn1VphI9P/RKXPMm/n3rhD6+7VqJyM/nU5vxmZPQN8uXWYma
yoMyzAMxpPBVhefDl0rUe/Vt1wA+B1a0WvuoVqFrB0ydXIMw1Kzos+eGVxXS
bPBeNYbPb3X5CMyiKnT27EEdt2D8+5l9/iH9RxUav8w1MITPj01D9+1Rr0aG
iOeedQiGVEzOGopfrUZnN5wVx/CZ+FV74GJJNXKfvFWObuH7i5qgtPB8NWrS
O1tdgs+H12lkXt1XgzY+KI/bFoqhhFTLGosbNSg8f1LpAT4HtV4MvFlXg1Yc
a78xh88Or27RN3HUoorDHb32t/Hjj/jE2RDdWmSk31pejs/8KoeT1W7VIicb
vhLJOxhK/ZR60a6+FuXfFHW4is9uWxenx7nq0IWv+i878PlvatrsB+k69CTp
zEeFMPz8dnU2cZdeHfr9QuyLPz5LJuo90XCuQ1tE478w8PmBYNTxr6F1SHkm
NEryLoYonUzPY+l1SIlgkHkRn599J8kJkutQdcYuy3f4/NmuODNyvA79K9PT
W8RnbvHkwDy+euTCFFuufw/f3q33JB8q1KPIsyudbuEz6da6k/TD9Ujq2P5f
1fhcpZExVexejwJEkusX8HnHbg2T4xH1SOB2cr16OL7/RFT+S8mpRzv26Phd
wOcDql/Mjej1qHRSYE8KPj+W2+CR97Ue6cfsaaaHs3oEhv2Vgg3I8NtL33/4
rL/SW+z2jgZU7eF8SD4CQ69/P3n1w7wBFed8zrXA5xe7nFsbLjcgid+MU9fx
WYSkSjaJaUCVubHMRHy2TJ8TCS5pQOZabQeq8Fmwp07Ok9mApDd0N3Xj89lT
qv2VPxsQwVFIewafAzWSxvPFCaiEp513ZSSG1trzVpzdTUBFEp13N+FzQMfF
oXJbAtIq0hhSx2ff5IA3Pv4ExL+ad04Pn79U3tMeSyCg+xcpzqyehbJi9BaO
KgIKYirzs/oMkxMJjM5eAgr75mfF6jeghSObBBbwv7+zbYnVT3Bw+EX4LElE
5uHL/9++k/BL1ds6+Kx7r5XVOzi97vAM0YH17woY+7P6EfY+cdYuwUS0bIzL
mtWXaF8/FlyfTERj9kYrWX0pcfEdnKR6Igq7+fS/vhDT8dqR20OsXkxIFqtn
cZqz6uNnbhJKrvITVsLn4OlM2QJZEgrRefFFHJ83asRu1zhIQja++g858flO
Y8C9k+dJiEzJiB/Hvy+37LM5B+6SkL9jTAUNn0eGvvuEpZPQm7Gar3n4LO/u
f/8SmYQ+ZcZ8e4DPE/rcXus/kdCqf/PJF/DZ1+teuht/I5KI3PVSH5/jvpQE
SWxvRLfeXr2zDp93Vw5tDjVuRF8aH5R8x9dDSi/f2icejUjxxd2EWnwOM1Fl
Oj5oRHwt4RKP8JlLaGnno5xGpOs4J3Ean49so0440xuR9/ztXXL4vOpBzLnZ
r41ol0JS6BS+XhMP2u1VXtOEZFpX+hTic5rpxrbNqk2IHKAz4IvPBtnhAldM
m9DE1c6Ve/E5z3bmuadPEwo/2Y1m8P3l6XG7XzKPm1C9q3LkW3w+nFmVequo
CXW+WHbWEZ8fG5FnELMJFantahLFZxvdNr7yn02oPDz0AwXfXz+Gdvv2iJPR
3+1BY774PLO+P6tkNxl53uD/wnLtsdwRQdPWZNROxza148cDTl2NNx3XyOjL
izs51/D5M+V90uU4MjK0+tGyCZ9fZASOlpeTUbGUC60aP95MdFJbTveSkZKp
NvUEPucfFwuqnyej6HU7Zhfw45We4sk7VEkK2i0X4BSNz2bHXlo+1KEgI/Ok
o8r4rEAcvrrgQEHtIX8Xq/DjYXwkTbspmIL2JkdOGONzaFox+VgKBR1Y4TMx
gB9PNQUT3txsoKA3fbnirvh8oTnAynWYgigr+F7P4sfjnT28KYWcVCQ1tHll
KD437Y3an7aVigSO5q7gweeuCZEsc30qyuixXIjAj+8FX56cS3ehovIoTf5l
+Cx9oI504i4VZatKEALx84Pg+Kcv1HQqamcarVjCzyfsPkbZ/iHMB5/ZfYyr
HBOXJvHzEbuPwdMta+eCz+w+xvb0j8qt+PmM3cfgetfvaYDP7D4GA/3emoWf
/9h9jDVnb0aL4TO7j6G5VT34Fn7+ZPcxdP07jg7i51t2H8NCbMjFEJ/ZfQx1
gV0jSfj5md3HOIDNFfzAz+fsPobTr/NOlvjM7mO48I4OvsLP/+w+Rpj06wcL
+PUCu4/xuURQ1hqf2X2M2TPaP5/j1xfsPsZJuYe3p/DrD3YfQ/heZZsaPrP7
GJeDFvov49cv7D7GTYlIVIdf37D7GOSihKZ5/PqH3cco7+CaQfjM7mM0P3rq
E4ZfP7H7GB7PNW5X4NdX7D7Gy7W81Dn8+ovdx1BVzVLYhs/sPsa31MIVDvj1
GruPQT/JuBqHX8+x+xhxCt3u1fj1H7uP8ZFy2es7fn3I7mNQJ12DBfCZ3cfo
edkysx2/nmT3MbqztPjt8OtNdh9j9h9XnDd+PcruY1hw3xJ9gl+vsvsYnefp
EZX49Sy7jyH+59gIDb/eZfcx2nVJVZP49TC7j9FIuLb0E79eZvcxVF54C3Dg
M7uP8aX38451+PU1u4+RwWkrK4lff7P7GIJPAvyV8etzdh9D/ouGgjzr+v3/
+hjblTf0y+DX9+w+hnrq69uq+PU/u49x6OGfbzL4/QG7jzEfbR0vj98/sPsY
Asr5/SrHMehjXDJrs9iI33+w+xjpGZSnG/DXZfcxGDvzH3Pi9y/sPgbfpi/z
E/j9DruPsaNlfeOwOQZ9DJ6U5YUN+P0Ru4+hfmbYqAi/f2L3MVKS+D6l4/dX
7D7Gx/xbIiH4/Re7j7FNc8b/In5/xu5j8J+0+rPPGIM+hpPk8OJm1n/f+n99
jCTFK7rL8fs9dh+jQ2eWqx2/P2T3Mab1pD/kG2LQxxj650S4jH+P7D6G07OO
Mk38fpPdx7C4R7UWxu9H2X2M3wPR5xkHMOhjPFYp80jG72fZfQwR03cSl/H7
XXYfQzeG57Uifj/M7mMk+ocWz+L3y+w+Bvex7u1p+P00u4+xbz+StNHCoI9h
sldgiyR+/83uYwj3DP0h4vfr7D6GxcoXqrd2Y9DHyBZzbtiC39+z+xhOVwR5
SBoY9DFmFU7vvamOQR8jjaKjulYNgz6G1Oo7Lo07MOhjlNaiwesqGPQxNr2r
iVytjEEfg+/JZe5yJQz6GBEKBzQMFDHoY7SsuerfLo9BH8M7X2jzdTkM+hip
GWnj/2Qx6GOoWm2wfSaDQR/jRMGPKzr4fsDuY4Qlm26p3oJBH2NNZTeP9WYM
+hiSxkFLzVIY9DFMg274HdqIQR+j2NC+4v0GDPoYGVq3bh5dj0EfI+tso2Wn
BPa/Pka0mbruWgz6GHcrbjS9EcOgj6HTvp5LVRSDPsZuf6e30cIY9DE6ErKN
Vgth0MfoX8pXfyiIQR9jQvTi3BcBDPoY8etSdZ1XYdDHqG+snWD972vsPsaz
s9qFa/gw6GMEXtkaGbocgz7GwGi4RtsyDPoYXMdLdmvzYNDH2Dk1NZmFH3fY
fYyq9I/9Pzgw6GOoVt32KfjHgD6GzPSpPNUFBvQxckvOWX38zYA+xg+9blrG
Twb0MZhBGukbpxnQx5iRd+Vp/sqAPgZpdQem9JkBfYzda1RE4vHjIruP0Wy7
fElnhAF9DNPnXYqxAwzoY9xboflEpo8BfYy3ZjnJ9d0M6GOI1AkRBJkM6GMU
2CnoxbcyoI/BeyFzHGthQB9jenUSQ4zKgD5G3/CFPU8bGdDHcC8IjiM1MKCP
sbps/yq1Wgb0McjB++8YVTKgj1EjHZbvXcaAPsaSu4p4RxED+hilSNRsNI8B
fYxDl3/ZqecwoI8hmmV+ICqTAX0MG/L6jidpDOhjeCkpWfelMKCPIbwm/UFL
EgP6GBvurz1Ii2dAH6N2QGvNyicM6GO0q5c4/njEgD5G2C4zB8kHDOhjUPlr
ua3CGdDH4FNNWb7zDgP6GFsu5bZZhzCgj7HUI7Zi000G9DE2ccwkKl5nQB/D
JqTe8KAvA/oYtW286rw+DOhjqJnfTOT3YEAfQ/d33tFiVwb0MQrbbd5ddGZA
H6PPWIbshp+H2X2M78yT3/lPMqCPsc93ymz6OAP6GEdCzsSPWzKgj5EQJ0IL
NmVAH2P1e5rdGWMG9DE8tnf2DxkyoI9htOf3+CU9BvQxNLmELhvrMqCP8dGU
UU/UZEAfo7W+RC5sFwP6GLPbHtqNqzKgj5EcfTzEdjsD+hgd7WITwvIM6GOE
Hfo4fmErA/oYF7no1as3MaCPEfzqY1nDegb0MUTKrTeIijOgjxEVeulavhAD
+hjPpzoMJlYxoI8hsT+Qqb6CAX2M4RD6XTI3A/oYrzjnfef+0aGPQfTj2Hht
ng59jOPZxSW8v+jQx4hV+mevOk2HPgbX0W99GV/o0Md4VPTt0rtxOvQxyj4f
T3g/TIc+RopxBsH4Ax36GFsk5mhWPXToYxywuuOT20GHPsbK16/nkxh06GOY
uR+8/YJKhz7Gmd/uHVMkOvQxKruzse46OvQxnoe0KglX0aGPUSCr8c6hjA59
DIvcE7WokA59jNaa2COXc+nQx9Bedd9SK5MOfYz8w8rbRVPp0MfonEspOvCC
Dn0MC82wEM4EOvQxEKHjqVgsHfoYf/Xmsvc9pEMf47O5K/NXOB36GPkBn92X
3aFDH+NI/JJEWhAd+hi3VnfR4v3p0MdwceqdeulLhz6G6aGGP5redOhjDH7X
U1a4QIc+xvBQ76F0Fzr0Mb7Sszz3nKFDH2NE7tnUZns69DE43rdsiLOmQx/D
NVNa55wZHfoYzh8zkoyM6dDHmBqp9q44SIc+xvFnV8/e3k+HPkanz+ambi06
9DFcfENX6O2iQx+j+RPjCa8qHfoYP3avP2GlSIc+RvClLJ5/MnToY6hRncd2
bKJDH+NAqLrItXV06GN43pmw3SBKhz6GLlU41nA1HfoY5kvFtxgr6NDHcM0L
m/XkpkMfI9BTSyb2bwv0MaK5V6tJ4Pcx7D6G5PHZ35tnWqCPUdvL1Y++tEAf
Q6akrq3mYwv0MTi3R+6vH2yBPkaXM7+9TG8L9DFCD5c2v2C2QB9jf+GT688Y
LdDHMN5avzRHaYE+BuHx/roeQgv0MagXLH5tqGmBPoZZYPVP33ct0McwXKj5
blrYAn2Mpl7XqAc5LdDH+LT/ooxRegv0MVpDRTZIpbRAH2Od0r1Jm8QW6GNo
20xeFIhtgT7G273fXRSiWqCPwT+rtXDqXgv0Mbbq6XIJ3mqBPsaTn+L52260
QB9DXlWNUu7bAn2MK7v3irt4tUAf44ih1wE/txboYyhKjD5c5tQCfQyZ4F8n
Fk62QB9jdLblKf/xFuhjZBevK4k2a4E+RthLr+DbRi3Qx1j53XfbN/0W6GMY
Hzdb17CvBfoY+dbXpvLw+2R2HyOr8ZyDqFoL9DFe7ThydFSxBfoYu/amNirI
tEAf49Nj8cp7G1ugj7Es7rO71doW6GNI/jQ8EbumBfoYh6uDXx/gb4E+hvle
ajYfTwv0MUQbv2cb/KVBH0O8xU/n2y8a9DHydohX8k3RoI/R6tEWjiZo0MeI
+D4gOzZMgz6GTur2swu9NOhjbA1avvIWkwZ9jMu0zIN+dBr0MZpN9x0Mb6JB
H4PWt/fHynoa9DGquGsHFstp0Mf40ee88UwRDfoY8dgFl4EcGvQxBEdWv2x+
TYM+hvzvpnNKyTToY3Boc6/5HUeDPkYzPc3mwyMa9DFOHB131YqgQR/jtIE1
P2coDfoYVra/1u+7QYM+xpowqTVPfWnQx9ghfOmQrScN+hj2Tinyj8/ToI+x
9bGClvoZGvQxsO9ZiUZ2NOhjKBQesQm2oEEf41xw7bSkMQ36GH0HB9epG9Cg
j+HYJiuQq0ODPob8H9cvBrto0MdQD6e/sFGhQR/jWaNCA20bDfoYmrplDtWb
aNDHOMLjoEGToEEf4/VPlW26QjToY7wQoLQq8dOgj6FHnrsdwEWDPsZ2mibH
xHwz9DEaxSputP9ohj5GbeyuNKkvzdDHmFLnujI+2gx9DNcRZaZgfzP0MYRN
bl61YTZDH+NK2OBKSXoz9DF2r1JvQ43N0Mfwwqx2jdQ0Qx9DbUZIMb2sGfoY
YYM1v0h5zdDHWF+0+fW5zGboY6CURkGnlGboY/hdSk4IjG+GPsa5IBlLycfN
0Mc4UtTlIhreDH2MgPA1Fg9DmqGPMfdGsUDRvxn6GA8iewU2XWqGPkZc57bI
OPdm6GOcVNzz6bxjM/Qxdq+sMbA90Qx9DMfsbcJ0i2boY1zYdtMu0agZ+hjh
b99VfdFrhj7GfmGGX6xWM/QxxsSL3p5Ub4Y+xqbbJlY5is3Qx0h6Tv9kKt0M
fYzq58yEgPXN0MdwCzSQogg3Qx8jpn3XDjf+Zuhj/JB6lhXN1Qx9DI3g9Q8E
5qnQx7jPz0PPmqZCHyOGq4KOTVChj9ElndB8aIgKfYxDYid2G/VQoY/RtTL7
hFcrFfoYnm5tYiNkKvQxFvyNo0bqqNDHWPmXdE3tHRX6GM+fhNJX5VOhj3Fv
+aT9ykwq9DGGXYhT1slU6GM88fl7cEccFfoYMXX21y2jqNDHMKwtcE+8Q4U+
hu2Y/HWfm1ToY/wk204/vkKFPoZR3989+hep0MdAF/YlSzhToY8hfzOAe7c9
FfoY7wk898csqNDHqK5+OdZ7hAp9jITsmbHZ/VToY1wZ3u6eupcKfQyNraWH
nu6gQh9jafU3+41yVOhjnLUZSfi0kQp9DC6eK3+7RKnQxxi0MFo4uYoKfYw1
pQHpMtxU6GNIn6pKuTVPgT7G0JptirwzFOhj7CKafaF+okAfY/1u9RNygxTo
Y0yv9qETOinQx+D49dfqTgsF+hhlU1NfB4gU6GOMVB0UuF5JgT7G+LTdbHYh
BfoY8SvdTi57Q4E+xtjfstZnKRToY9QoBXq1xFGgjyGWtuujVhQF+hjkv237
DO5QoI9RkF/39MoNCvQxug7UGA9cokAfw1z22sFxNwr0MdpurHaUP0OBPkb8
A06ORzYU6GM4zzPMnppQoI8xwDGg3aFPgT6GHt94TIEWBfoY3qNBQ6VqFOhj
LNFyD8/IUaCPsVf1dyhdigJ9jJaiW0kDohToY8zcRwoSKynQx+j5m7Mww0mB
PoaGXr0U5x8y9DEO33fUL/xGhj7G0vNxy/tjZOhjxHMGqsb3kqGP8UR9x/XD
bWToY9jMOx5TIJOhj6FaSjbJqyFDH2Ov4LcahxIy9DGkyJPq+7LJ0MeYiVyz
v+ElGfoYI4o2q3zjyNDHMO5IIZk9IEMfQ9S34XFHKBn6GH5cfHdvXydDH+Nh
0EbTfi8y9DEsFaVunzlHhj6G7UE3q9UnydDH4O6Udj9nQYY+RkjCXPv4ITL0
MdLWXJGJ2UeGPsa/pJE9nzXI0Mc4/mXVMjcFMvQxIl4KH4/dRIY+xlZn/bUf
RcnQx0jvWW/oyE+GPkYrTeLGfQ4y9DEu7rcK7p1tgj5GsdoKs57JJuhjRKQs
iXMPN0EfY8uaMFGzriboY1iGldqatDRBH6MlZ+ftiw1N0Meo+LBsY1lZE/Qx
qs6N3yrKbYI+RlHVFSXsVRP0MbyW+Z1Pjm+CPkbG5ujnz6KaoI9xZ9cq/9LQ
JuhjdN/c53bnehP0MfKbq7N9PJugj3HZtoci7NwEfYxevRzPIbsm6GN8jWkl
Nh9rgj6Gjnud/0WDJuhjaH05FCGn2QR9DK7i+mhBlSboY6yzqYjI29oEfQwx
uy/bXSWaoI/Re6M8vEegCfoYPDFZvte5m6CPQfX47Kz6pxH6GHtfGMe9/NoI
fYwfrho+8sON0McQfJVl1N/ZCH2M92U3F0xojdDH8Lh4LLmtrhH6GNlvRsZF
Shuhj/HtVkPD+TeN0MfotNq5/fOLRuhjFIX/bVeMbYQ+xjUvM8sb9xqhj/Ga
LDZ0/2Yj9DHSPj173nKpEfoY2nvvBG083wh9jM2xe7hUTjZCH8PP7ODBo2aN
0MfQDLDcmmjQCH2McJOY/W80G6GPoXnv66lG5UboY5Tu4n3wWroR+hg9ZqqL
JWsboY+RsvJTEbayEfoYA6YBovkcjdDHSN+0ySr+Jwn6GEYZs0KGEyToY7iO
WKfJfiBBH+PGUPfxVW0k6GMoT6hsq2gkQR+j6fh0ukcFCfoYDmFSzhZvSdDH
2DemMrb0igR9jMu5MkcLnpKgjyEU+f3Y9kgS9DE+DS7tex9Egj7GOtJh04jL
JOhjVJzb+GKZKwn6GFGtJc9C7EnQx7BoOzG5w5QEfYzInZ+3ZeuToI+RMJ6n
K7uHBH2Mo50cGz2USNDH0Cl5yjWxiQR9jJedtPmzIiToY2w1vHXmzXIS9DF+
/g45822eCH2MiAsvsrm+E6GPsTajNM54hAh9DPvMXJOoTiL0MYR5kxZeUYnQ
xzh41n82r5oIfQwvd8fpqXwi9DH2zygkL3tNhD6Gj8Gq8jXxROhjbPc0dJmK
JEIf4886n45lwUToYzju5+oRvEyEPobQjK301Dki9DH2WP6+SbAjQh8jz/vI
QvNRIvQx/Natu5mznwh9jFUKJMVADSL0MSKyjtfJyxGhj2FsUfenYR0R+hhP
kly+R68iQh+joFkwdh8HEfoYg7eyvzJnCNDHKHf60XvkIwH6GOHLq6xnewjQ
x6i1/JB8n0aAPkbhFNrHWUeAPkb/RR/JM4UE6GNcba8fnE0jQB9Dkv6c6B5P
gD5G3y6X2aYIAvQxTJ4H7VgWSIA+hpDAPukAHwL0Mdrava52ORGgj5H3/FW8
2HEC9DHk6sTu7T1CgD5GpGmWuq4OAfoYyrnnNG/uIEAfI+bm/vXJWwjQx/A/
cyfktSgB+hjK/uflH/ASoI/Rb5YblPunAfoYBpydu4snG6CPER8dpZDY3wB9
jEfuSRfPYw3Qx9CNHN/vRWiAPobdOksbq5IG6GPMt/U8kM5sgD5GyaVFF1pC
A/QxON5/25wf2QB9jI6JnR8CAxugj/HnpouqnHcD9DGCaxv9Kh0boI9x683E
WzmrBuhjVHeFeNIPNkAfgzpcuNJpbwP0MW6mR9xqUWiAPsYnwxv0bZIN0MdY
odMTXbW6AfoY6kuPt23jaIA+hpT1cq/gmXroYzjdNerJGamHPgZ14s1yMWY9
9DHEZ+x7vJrqoY9x++qr/MR39dDHsA6231b+ph76GK1qbjZiz+uhj1HlTL2O
ouqhj/G42Vr6dHA99DFseUT5jX3qoY/ByP/x87JjPfQxJuenT8Ra1UMf4/rt
mN7Ag/XQx+DkUus8u6ce+hjJ21VUBeTroY+xOFGt9UuiHvoY1mk/q3r466GP
8W18yjt0oQ76GFYJdsnyX+ugjxHT0hYqMFAHfYxwpbT/p6g7j6dqexsALqRM
uSFzkUimSGRIVtwoKbpRVKaQ8Soyl1AyJKGSKUoyk3k85vaWqYhKpXIzJXSR
QpK8e53f67l/Pp+z9t5reJ599j/ru7wruhrBxzi46+5b86ZG8DFEp/LCm4sb
wceQEtdUdE1rBB/jUqL7Yd7YRvAxDEwMgi5ebQQfo5I3VGHIqxF8jEz/3OHr
Do3gY/AKmgTPmDaCj3E27cXdU/qN4GNo7XZ9GaTeCD7G6O0HN3NkGsHH+NzF
yc4r0gg+hm7AtnNqHI3gY6wuvUsjfzaAj9Ehotge3tcAPsab0Iq2TloD+Bhf
XP5ZK5HSAD4GrWfw87B/A/gYoa8ubK20bAAfQ4bhWTSXdgP4GD5n80W6xBrA
x3gn4iyeztgAPoaEpn3S+4F68DG+C40VJDbVg4/BJjvp6/awHnyMqRdnuTKv
1IOPcfQB65V523rwMfbZlCw/1KkHH8Otr/dG7+Z68DFu+wjrSTPVg4/xNHW3
Uc9AHfgYXS0fi1Me14GPoVz5KPjbwzrwMUyFmlbdvVIHPgaf/Bc+J9s68DGc
qx+zhGjX/edjVMy2SIvVgY/hec0paIGhDnwM59XP93H/Uws+RutLVnWzhlrw
Me5GZJ6TTa0FH0N2wHdBJ6AWfAxOw2TGSMta8DHa31b5b9CsBR/jo2BPZY9w
LfgYcm7NdZt+1YCPwRs+bp/5tgZ8jBurrivZV9eAj6H/bfCRRVwN+BguSnN6
gx414GOc6xsJe2hcAz5Gg9SHgHjFGvAxJN0Endq5asDHKPzVtCZ6igY+xuZh
Hb/LT2ngYwgEXj9amUcDH6P1e/gCXzgNfIz+H6ypLGdo4GPMrQncr7WPBj7G
8xsx+UliNPAxAjmYHLWXq8HH+PS0+Jl/fzX4GK5GHfOvadXgY7AEmzJcSawG
H4NYz1ix36safIxtj4/nWBpXg49xy4N7kF2pGnyM7W1sVV2c1eBj3I8Vcxib
qAIf40Jn1LUNLVXgYxxffinbm1YFPsagZIPj16Aq8DEmPQ/0CZpXgY9xeKfh
kfvqVeBjbBypFqznrwIfI8D78vTwTCX4GIXqixddn1eCjxFikfZ6IbcSfAzb
7uSqjaGV4GMEZblIZttWgo8RfkqZfYdWJfgYDgcTv4oLV4KPwV/LzcA1WwE+
hihPiWpsV8V/PsbkbvOw/ArwMZ45pKmdC60AH2POyv1yi00F+Bg9hntm6lAF
+BgCAbTHDwUrwMc4bGDf93u2HHwMPROLL/u6ysHHqGRm0JPKKQcfQ/XI+vHg
kHLwMfYr7vjdbFkOPoYrS9/oVY1y8DFylfYojPCVg4+hfHPGU3K6DHwMrZaM
y6MdZeBjnHCQ5w5JLwMfY7R7eDkzsAx8DCPGtax/nyr7z8cY82Bbo1wGPoZI
xiU3Wa4y8DEWSmTQ5tFS8DFYhRpUqhpKwccw+/vi4w9JpeBj8Jf9nu88Xwo+
Bk+4gv1fh0vBxzB7JaN9YVsp+BhBVUqbnBhKwcdolHI1nuwrAR8jYWPasHJJ
CfgYP0MVR0QjSsDH6DaICs+0KwEfY5g5Nu/z7hLwMT523xNr21ACPsaeDy1m
1l+KwcfIunqrJYUoBh/DVZNzIiClGHwMnYKON394FoOPUcyQtEv/cDH4GAnb
72vLSxWDjxFn9la1dqkIfIx/naMm53qLwMc47s9T+zq/CHwMs+D9EjbBReBj
NMrotaeYF4GPsS3z6zk/pSLwMW5M6YiwsheBjyGdcXcsurUQfAyHMzap2p6F
4GOUjTFo2EsWgo/x4YzDcllXAfgYU7IugxYXC8DHuNBAvL0qVwA+Ru9pnZi2
3kfgY0yciV57K/QR+Bjn2uxUzio8Ah8jzsRHK/ttPvgYwteGz7pfywcfIy7V
NEdbKR98DNmk6Z7Mj3ngY6R1MDh6xeSBj/FINPWWlnoe+BiOonZfskZzwcfg
KexMXhWdCz5G0PsWo0bVXPAxXM+3dMt8ygEfI4E5tM73Rg74GOt1kyx8NXLA
x9hx0r/98+ds8DFG35hPKMRkg49BqzqoobwnG3yMLpXzrcxDWeBjcDHphSRE
ZYGP8fgUM9eD3VngYwhmaAw6DmSCj/FvwqrY5chM8DEWQhg/HdyRCT7GpgtO
LiyvM8DH6BE5OpR8JQN8DObvPmF9WzPAx2D4Jaq18DwdfAxv/XaHWP908DFo
03ZX2sTSwcfgi+1Inmh/CD7GnUuhzcmuD8HHcOhTLWhe/xB8DEef6PHRmjTw
Mfh0bX2vW6aBj6FXtjNp+5o08DEk5pZn9mc/AB+D0StG/MPBB+BjuAwHegV8
SwUfw2LpymJYbCr4GC/UjjCl704FH2P5a5Lmzdb74GO4pV7VjWa7Dz5Gpmqg
eIfZPfAxntkKbMmITwEfI6u90jf0bTL4GA+q9ug3SCWDj5GXuDPJz/4u+Bib
o2odEoqTwMe4n9Ia+WY5EXwMiTYFlgCtRPAxumi2xg+uJYCPUfcsvIW7OR58
DEXXAiMuznjwMRLvSc6qmMWBj3HplSxj1O074GPEP7s9F/EuFnwM31qz/Ac8
seBjZNiXab4xvA0+xqM/Jhw6426Bj/Fh50Wfxs6b4GOITZ7OC+S5CT5GgNe/
HX6nYsDHWJdAe5++NRp8jBceHIqSRTfAx4gTpskrCUaCjxH0cY4lNTwCfIzr
mk5BPNzXwMfQ32ka23sh7D8fQyhphrYUAj4GM40vps7qKvgY5p9jFpRar4CP
EXKo8sgqg8vgY5RH7dlkdSIQfAyPjB/9GX/5g49hZPGT+U9TP/AxekX36UgK
eYOPserTPGHF7QE+huzW9q7vUefAx2ARNl4O4HECH0MkVRelMNmCjyEml2e5
8MYMfIzP5v0bolbrg4+x/inf+N5GNq0Ts9ojByIRMihlbxxkeI5+qH9vvuNE
oJi/RfTxeedF8oweshEEClv7MQCfj8vhcaNgJpdA2uddN+DzcTnY4nwnOgj0
lEd0Fd6/dGfGfd59gkCcnid+4PPGO+VSvy6yk+jJOp8gvP8pv8rgQqUcidRT
HljQz7+O87yZfphE0cf3XMXny1o0T225c45ES9l+j/H+Kn49LReeGBLJOHMH
4v1XngJs2kQRiWhzJVfxefHemsYZ6d0kahVta8HnEQuVCCZUzpCoyr1MU5mK
V3yPwHn+yrus6kikuH/H4UgFpGV02s+dGq9GWNELqdMEqraXllPF5+t+qo8y
vEIgO/0ZIz18fjY/+6xLGoEULRNNjuLzrIV4n80SBPXdKyRkTsV7J0Ns04cI
tKWOg4bP52Xh9Qq/ykQiV5XPvXg8IeybRbslSNQk8bcD/Tz3l2yneXVJ9JjX
TwfPh+WUMLu8A4k8YwVU8HxVv3O21gwnkW7hk0v4/umJ89Y62SSKyFW0Msbn
CUtrvyhrI9EBSWuh/VTsG9E6vXGcRKKm7RFqeL/a/3sknxbDLQqbdVCnp67p
2lsEMkvrDjlE/Z7cyeXoV0qgjfcOZJlS8a8FfomBFwSKq93TYEXF43MW19E3
AmkYnubC+9nidDtOevCS6NXwq0Xc354z3q9SlEmkr54ri8fzxLS/Sfk4iTyG
Xsfh9uZ3Cc0lHxJxXHMXt8b764rWe4/Hk+jS3s9mZlS84p+U797gnsEujdK2
CXQcixRFW8J5CDVqPfoeRfVNmxNo7/pzHCpUe+Y/U0SsAwhUJeafs4+Ky8b0
E7bdI5DPHzcH8fpLiBvP/2wgUPppbf5TeL/cl+jEun8IFPpelgOvR1rYPy8O
LBPoxsgzN7weM2XXv34QI9GHfxA9/558e3Xg6V6cX5+i6evBXPL7hw2J5uqt
PuD1iNi66t2Rq1R+TRqftaBizZOT06vSqfEqsNWYUHGBqNp4bTOJvCPCyg5Q
ceac6MbuERIV83KnalDxitfylKeQq2FEF6HuLSOCUQSqVDZbY0D9/jLVkH1X
IYGmZ9Xt8H4/ZkZTw09dBBJbOjhCP9/6u0OT2RSB+N82h+P9gkrVKpmqf5CI
+/AXAvcXcQ1k5SqSyN0m73/7Db1zcr78RaLSjHM8eLzmRScU2zxIFBIr/gOv
h95i1vTv2yTaNzXhdoKKV3wYW7HEpfkWJeQ8fVH++iiB3rwWtsTjd05l29O4
hkQFXV478PMEbCoOkdtI9CU1kp7PVuXIz1yfRGpJe8fw83gXjI9tnSdQtpBc
JM6Hn93WXIUCJNJQVN6G29vXsjPdVCORnfM9Jno9qPH0+Z+k+ufivQ63X/Fm
xMWXXAo5BFEB//Ul+0gu1C6x3Rb75DJNSxavThJI/Jr2D3weuaZ75JCjP4GO
Cl7uwfX//OjYGEsygXYpSEri/NiWeT5yqY5ATyZ+38TvD4aJWOX2DwTKy4ss
xu8Xt6bYBZklqv0HF3Xc/2zWppPDm0hkvvuMCe6fdXCNZrYWiaTbFUvw+PvX
XfrRb02ih8La8ng9ZgwOCZy6QiIH1dFBnB/htLGqgQfUeL1T7PD7cTCpdLaR
IFERX88l/P6szzcozR0i0eblfZn4/bri4yS79mcVeO1Hvsvc+eKRBBJZPEXf
7znNOmnO+4hAbl4G9fh+a0O9hz4/I5CXkr8nzo/cb3+bn/mXQExtbdr089G/
jXcIriPR6W0PH+L+ztnyrS/eTiK5wVH6eG6xRKe0GpGI7YnRYTze9zQJmUJ3
EjHaVlvi+SgQ+ybPeotEYa81FnB+rHg8l5oW2fo+q6BjU0Gt8SMEIgMMOXF+
qPU12KStJlHS7dTV+HmdFRPl7VtJZP26zhE/78c+SVe1/VS86zg//n153mxa
aZZAG5oZjPB6t7LzqdzkI9H5s948uL3Ieu2/43eRaHXaCP18b7nWH8/MzEjk
ayZmgtuv+D6yI3qLm9rE0cvDMgX2q0jUl3MoA49H0/p4+GtxEs0GxtvSr7eb
NpnWIdF76Rxn/Hy7wKCgY9zU/IcfHXCgr1eeVroSiTZJfdmN29twXh6qkyHR
5Yg3/7s+IW/sqRCJzqlwaeC4yKE3MUKD6s/dlxP4+hUfyC94la8WJyt6Mutm
cy1yWettC7vSOipfew6W3285QaC0bD5XnK9ma5n3u14kUGMsjz3OV8s11dxz
SdT/58FjzXi/sYwj4+vftQTSV3E0xPnq7cx/5fl7Au2w+isYr4+Z5TkOkV8E
WrybIYLHy1R2Knp0IzX/JIsRvb8GBbvi9uD9wRqPcf82xdrMdluRSEh1swnO
j8z+r7usL1PjZ9wngvOnwHk0uTuVREPlR6pwfvmbuS8+fkyiY1whAzhf28NO
B8QPUuunpLMN7zde8Y20XfntUvccQLFxEVxS16n37cK/9PYB9XUhTPkEmrDT
cMb3YzvAsn38KYHUz4ruxs8T85jKcflCoBIp6424P6PRzf1snCQaueB0C/f3
r3XFumXyJHorcOcE/f3SeTm+wpBEvz9KOOHxiuxlk0pzI1Gt6fcYPB82pQmH
1t0kEV+klyaerxVPyem5wL9afqqo/SwT371hAsXK/hrC/weiPklet5lJdLEt
dRLfr5lDwGGrHpX/v3Xl8fM9fd7tUf9OIKuoQAWcb4XZ0/uvbCDR0WDGtbg/
PjXvUpNUqPenToI4/X0bPdGiZ0qiCec+L9x+xWcyiRozch6XRDXjzE2mDCQK
KnS6jp8Xz/a1tm8zNV6uWmv69bJDhv3a1HxLZl7CzzcQOXVbbz2JBFsWe3A8
bKfnkbWDRDnCIn/i9nWVwgJN0iSS+Mpoj2MeldBfdYLU+541YAeO2bndO2+o
k2j/K9Yf+PoV/+nXe55rlW3c6LDV1q0DotT8TYrT5zep+uL7RwokMv6ZSM+f
gbO7xVP5SZSctWMTjj+W1xi/3EKinTt6zuB4je2nAposiaTOcp7Gse7i8953
wiTqLRvVxvGKFyVS3sOVxLmgNVesKdcZOaUl8Wi74BqqHjK5bjbuperhoaKm
FK6HTy8afKcuEKi2O1UB10PGgFiWK1UPv/u23sH1IKd/0D+QqocHF6zk8Poq
5r7JNqbqwbPjhwte/6f57+/ELhLIX3aJE8+vImuOtBNVDwlI+BDuD3dh1k5O
qh5Wb1tow/NRf/yVhwFVD6Gihx3o78vsfU8Gg0h0X7FSjf5/q/MpSp+qB4Xa
4QGcv/qqR37/SdVD5/xmHvw+PuL1ZYiTqodh2oIjrocV7yoxcn99/IMDSNxG
TzuH+l5mWb5QhOuhOUFS6GIegWYcJhC+H7u04Qtnqh7ele7chJ/XV1L0fJL6
XtZ0m2bD/TnZr+QYzEF9L5qHXcP9DbD9/Y8KVQ9n3AtP4fHoKV2MlafqIaKo
1RuPt5bxUoYwVQ8DZc9y8HzU+k+8i6G+l1dVvLbA87Xia4mNCxw7q62GQgpI
zc1UPfTyC3TherjVvGaZnaqHtoR3g/h++W7r7VKo79M7ovOq+PkKlcl2tdT3
YCTXVVGc3+LzFt0/qe/BuINMjLg/6X9I7xah6oHBWEWKni/fhsk66nvwKs0t
FLdf8bpWvxr9xHpRCm1XP3/wOfU9FjOsFICf9zH6vcExKv/z+j+E0tfHuVWk
gfq+ObT5egeOuWm3OaWp/H/90kcP3z80+FvILirfSaVpORyrOdQ7clH5HqD8
eQm3X/G+Qt82hqlObEAXyjwabah8t5d/cxy3b13X5q1A5ftR5mNHcWxSl50n
QOW7wuYJ+v9Nlb6WtQmVz/ER3Fo4XvHA5KOf9XG2M6Jey3WzZ6jvAz+B9r/w
7xLVtnlK1P8r7fZRU3p//t8Ha68J/jXFOaZ1Y5wmVpTbDr7a/wHtA5FK
   "], {{{}, {}, 
     {GrayLevel[0.5], EdgeForm[None], 
      GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwV0elWEkAYgOGBIClRWqwsDCVT2yzLLJdKvQUvwQvQy+l68pxyb9PKiswS
y2hBUVrQoocfz/nemV9zvsmOT45NREMIEe4TTYTwIBbCFI06nwzhoX7ENDPM
Msc8CyzymCc85RnPWWKZF7zkFSu85g1vyfGOVd6zxgc+sk6eDT7xmU2+UOAr
3/jOD4pssU2JHXYp85Nf/OYPFfbY5y//qBLidkGUA8SIc5A6EhziMPUkaaCR
FEc4yjGO08QJTnKKZk5zhjQtnCVDK21kOUc75+mgky4ucJFLXOYK3VzlGj1c
5wa93KSPW9ymnwEGGeIOd7nHMCO19/v3CKU6O2eNHE3uYpR1gXWanRNUdJG0
rqeqM2aK0do+zP9JBU4h
         "]], PolygonBox[CompressedData["
1:eJwV1mPYl2cAxuF/fONyqxaXvdxqadm2bdu2bdu2bZtbXC1jGTvfD+dx/+7n
+3Ncd5IGbSu0CRkIBEJwSNwMCgQOhtYkDhcIvHVP4IzMYx3PGYFv+i4/6yA+
6RfcJpZ7GN7rpzzgzzCBQEEKUZgiFKUYxSlBSUpRmjKUpRzlqUBFKlGZKlSl
GtWpQU1qUZs61KUe9WlAQxrRmCY0pRnNaUFLWtGaNrSlHe3pQEc60ZkudKUb
3elBT3rRmz70pR/9GcBABjGYIQxlGMMZwUhGMZoxjGUc45nARCYxmSlMZRrT
mcFMZjGbOcxlHvNZwEIWsZglLGUZy1nBSlaxmjWsZR3r2cBGNrGZLWxlG9vZ
wU52sZs97GUf+znAQQ5xmCMc5RjHOcFJTnGaM5zlHOe5wEUucZkrXOUa17nB
TW5xmzv8xd/c5R73ecBDHvEPj3nCvzzlGc95wUte8Zo3vOUd//GeD3zkE5/5
wle+8Z0fBML6twhJKEIThrAEEY7wRCAikYjMT0QhKtGITgxiEovY/Ewc4hKP
X4hPAhKSiMQk4VeSkozkpCAlqUhNGtKSjvRkICO/kYnMZCEr2chODnLyO7nI
zR/kIS/5yE8B/qQghShMEYpSjOKUoCSlKE0ZylKO8lSgIpWoTBWqUo3q1KAm
tahNHepSj/o0oCGNaEwTmtKM5rSgJa1oTRva0o72dKAjnehMF7rSje70oCe9
6E0f+tKP/gxgIIMYzBCGMozhjGAkoxjNGMYyjvFMYCKTmMwUpjKN6cxgJrOY
zRzmMo/5LGAhi1jMEpayjOWsYCWrWM0a1rKO9WxgI5vYzBa2so3t7GAnu9jN
Hvayj/0c4CCHOMwRjnKM45zgJKc4zRnOco7zXOAil7jMFa5yjevc4Ca3uM0d
/uJv7nKP+zzgIY/4h8c84V+e8oznvOAlr3jNG97yjv94zwc+8onPfOEr3/jO
DwK2LwQhCUVowhCWIMIRnghEJBKR+YkoRCUa0YlBzOB9JXbw9hKHuMG7zC/E
D95rEpKIxCThV5KSjOSkICWpSE0a0pKO9GQgI7+RicxkISvZyE4OcvI7ucjN
H+QhL/nIT4Hg/acghShMEYpSjOKUoCSlKE0ZylKO8lSgIpWoTBWqUo3q1KAm
tahNHepSj/o0oCGNaEwTmtKM5rSgJa1oTRva0o72dKAjnehMF7rSje70oCe9
6E0f+tKP/gxgIIMYzBCGMozhjGAkoxjNGMYyjvFMYCKTmMwUpjKN6cxgJrOY
zRzmMo/5LGAhi1jMEpayjOWsYCWrWM0a1rKO9WxgI5vYzBa2so3t7GAnu9jN
Hvayj/0c4CCHOMwRjnKM45zgJKc4zRnOco7zXOAil7jMFa5yjevcIIY3Zyje
6Sfc4w6xfQvLB/2Mh8R1D88X/Yr4OhIBEhGVJPwP3VF8vg==
         "]]}]}, {}, {}, 
     {GrayLevel[0.5], EdgeForm[None], 
      GraphicsGroupBox[PolygonBox[CompressedData["
1:eJwl12OsYMkWBtDbdk/btm3btm3btm3btjnTtm27Z9qYeevm/Vj5TlI7lUrt
qpNU4iYdq3QIGhAQEIRDwQMCUoQOCDgY/P/fEcIHBDxmKw8YwjpuU5PeLOUK
2alAJ+ZyhnikpRgtmMwRwhOOsIQhNKEISQiCE4ygBCGA/8IFBPzLb37xkx98
5xtf+cJnPvEPf/ORD7znHW95w2te8ZIXPOcZT3nCYx7xkAfc5x53ucNtbnGT
G1znGle5wmUucZELnOccZznDaU5xkhMc5xh/8SdHOcJhDnGQA+xnH3vZw252
sZMdbGcbW9nCZjaxkQ2sZx1rWcNqVrGSFSxnGUtZwmIWsZAFzGcec5nDbGYx
kxlMZxpTmcJkJjGRCYxnHGMZw2hGMZIRDGcYQxnCYAYxkAH0px996UNvetGT
HnSnG13pQmc60ZEOtKcdbWlDa1rRkhY0pxlNaUJjGtGQBtSnHnWpQ21qUZMa
VKcaValCZSpRkQqUpxxlKUNpSlGSEhSnGEUpQmEKUZAC5CcfeclDbnKRkxxk
JxtZyUJmMpGRDKQnHWlJQ2pSkZIUJCcZSUlCYhKRkATEJx5xiUNsYhGTGEQn
GlGJQmQi8QcRiUB4whGWMIQmFCEJQXCCEZQgBPBfWPef3/ziJz/4zje+8oXP
fOIf/uYjH3jPO97yhte84iUveM4znvKExzziIQ+4zz3ucofb3OImN7jONa5y
hctc4iIXOM85znKG05ziJCc4zjH+4k+OcoTDHOIgB9jPPvayh93sYic72M42
trKFzWxiIxtYzzrWsobVrGIlK1jOMpayhMUsYiELmM885jKH2cxiJjOYzjSm
MoXJTGIiExjPOMYyhtGMYiQjGM4whjKEwQxiIAPoTz/60ofe9KInPehON7rS
hc50oiMdaE872tKG1rSiJS1oTjOa0oTGNKIhDahPPepSh9rUoiY1qE41qlKF
ylSiIhUoTznKUobSlKIkJShOMYpShMIUoiAFyE8+8pKH3OQiJznITjaykoXM
ZCIjGUhPOtKShtSkIiUpSE4ykpKExCQiIQmITzziEofYxCImMYhONKIShchE
4g8iEoHwhCMsYQhNKEISguAEIyhBCOC/MO4/v/nFT37wnW985Quf+cQ//M1H
PvCed7zlDa95xUte8JxnPOUJj3nEQx5wn3vc5Q63ucVNbnCda1zlCpe5xEUu
cJ5znOUMpznFSU5wnGP8xZ8c5QiHOcRBDrCffexlD7vZxU52sJ1tbGULm9nE
RjawnnWsZQ2rWcVKVrCcZSxlCYtZxEIWMJ95zGUOs5nFTGYwnWlMZQqTmcRE
JjCecYxlDKMZxUhGMJxhDGUIgxnEQAbQn370pQ+96UVPetCdbnSlC53pREc6
0J52tKUNrWlFS1rQnGY0pQmNaURDGlCfetSlDrWpRU1qUJ1qVKUKlalERSpQ
nnKUpQylKUVJSlCcYhSlCIUpREEKkJ985CUPuclFTnKQnWxkJQuZyURGMpCe
dKQlDalJRUpSkJxkJCUJiUlEQhIQn3jEJQ6xiUVMYhCdaEQlCpGJxB9EJALh
CUdYwhCaUIQkBMEJRlCCEMB/3iX/8ptf/OQH3/nGV77wmU/8w9985APvecdb
3vCaV7zkBc95xlOe8JhHPOQB97nHXe5wm1vc5AbXucZVrnCZS1zkAuc5x1nO
cJpTxPW2SUNRmjOJw5w0FkempgjNmMghThiLLVNRmKZM4CDHjWWT5enIHE4T
i5QUognjOcAx9VllOTowm1PEJAUFacw49vOX+hqyF0u4TBbK0p5ZgWsnBlXo
xgLOk5x+rOAaBWjEWPbxp7kHy7Xcojo9WcwlMjOAVdygDBu4SzseMTNwf4jO
Zgaymsp0JRmb6Mty8rOeOzTkIWPYy1Hr2SLvM4g13KQaG7lHDxZxkUz0ZyXX
KU1bZgT2hWhUogvzOUdS+rCMq+SjAaPZwxFrqCq7s5ALZKQUbZge2EOiUpHO
zOMsSchLfUaxm8PmyyBL0pppgT0lConJQz1GsotD6tPLErRiamCfiEwiclOX
EezkoPp0sjgtmRK4j0QiIbmow3B2cED9HzIBOanNMLaz39g+9rKH3exiJzvY
zja2BvaJzWxiIxtYzzrWsobVrGIlK1jOMpayhMUsYiELmM885jKH2cxiJjOY
zjSmMoXJTGIiExjPOMYyhtGMYiQjGM4whjIk8OwziIEMoD/96EsfetOLnvSg
O93oShc604mOdKA97WhLG1rTipa0oDnNaEoTGtOIhjSgPvWoSx1qU4uagf8A
qlMt8HxShcpUoiIVKE85ylKG0pSiJCUoTjGKUoTCFKIgBchPPvKSh9zkIic5
yE42spKFzGQiIxlITzrSkobUpCIlEZ2v+OSgFkPZxv8AoVmT9g==
        "]]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, 
     {GrayLevel[0], Thickness[Large], LineBox[CompressedData["
1:eJwV12PUJDkYBtBvdmzbtm3btm3btm3bNpZj7I49u2Pb2ts/7nnSyVtdOemc
rkrSZp2rdQoWFBR0OERQUCAny0ZkJyqfggcFPeYXYyJIV1BIQhGaMIQlHOGJ
QEQiEZkoRCUa0YlBTGIRmzjEJR7xSUBCEpGYJCQlGclJQUpSkZo0pCUd6clA
RjKRmSxkJRvZyUFOcpGbPOQlH/kpQEEKUZgiFKUYxSlBSUpRmjKUpRzlqUBF
KlGZKlSlGtWpQU1qUZs61KUe9WlAQxrRmCY0pRnNaUFLWtGaNrSlHe3pQEc6
0ZkudKUb3elBT3rRmz70pR/9GcBABjGYIQxlGMMZwUhGMZoxjGUc45nARCYx
mSlMZRrTmcFMZjGbOYEam6oxOYjGZxvtCXMD1/rchJxE54v+pyzS7kgxkhCa
eYH7yKbkIgZf1T5jsXYnipOUMMwPzEk2Izcx+ab2OUu0O1OCZIRlQWD+sjl5
iMV3tWtkbyqQjhf6lsoulCQ54VhPP6qQiYWBtZAtyEtstjCYmvzwPWtlHyqS
npf6lsmulCIF2xhGHcKzgf5UZS/jyMwORlKffUxkUeC3kC05QD52M4Y4DKEW
4/np3pVkBkZQjwm80r9cduMgpdnDWFKyneHUJQIbGUA1srCTUTRgcWBfyFbk
Jy5bGUrtwJ8P6+hLZTLy2v1XyO6UIRUR2cRAqpOVJYH9JltTgHgE443rV8oe
lCU1kViqfq5sQ0Hi8wtv1a+SPSlHGiKzTP082ZZCJCA47wLrY2y+djsKk5AQ
vA/M3dgC7fYUIREh+RCYl7FVrGYNa1nHejawkU1sZgtb2cZ2drCTXexmD3vZ
x34OcJBDHOYIv/Ibv/MHf/IXRznGcU5wklOc5gxnOcff/MN5LnCRS1zmCle5
xnVucJNb3OYO//Ifd7nHfR7wkEc85glPecZzXvCSV7zmDW95x3s+8JFPfOYL
X/nGd37wk8ADMBi/EJwQhCQUoQlDWMIRnghEJBKRiUJUohGdGMQkFrGJQ1zi
EZ8EJCQRiUlCUpKRnBSkJBWpSUNa0pGeDGQkE5nJQlaykZ0c5CQXuclDXvKR
nwIUpBCFKUJRilGcEpSkFKUpQ1nKUZ4KVKRSYM5eBCrLKlSlGtWpQU1qUZs6
1KUe9WlAQxrRmCY0pRnNaUFLWtGaNrSlHe3pQEcCLzGd6UJXutGdHvSkF73p
Q1/60Z8BDGQQgxnCUIYxnBGMZBSjGcNYxjGeCUxkEpOZwlSmMZ0ZzGQWs5nD
XOYxnwUsZBGLWcJSlrGcFaxkFatZw1rWsZ4NbGQTm9nCVraxnR3sZBe72cNe
9rGfAxzkEIc5wq/8xu/8wZ/8xVGOcZwTnOQUpznDWc7xN/9wngtc5BKXucJV
rnGdG9zkFre5w7/8x13ucZ8HPOQRj3nCU57xnBe85BWvecNb3vGeD3zkE5/5
wle+8Z0f/CTwohuMXwhOCEISitCEISzhCE8EIhKJyEQhKtGITgxiEovYxCEu
8YhPAhKSiMQkISnJSE4KUpKK1KQhLelITwYykonMZCEr2chODnKSi9zkIS/5
yE8BClKIwhShKMUoTglKUorSlKEs5ShPBSpSicpUoSrVqE4NalKL2tShLvWo
TwMa0ojGNKEpzWhOC1rSita0oS3taE8HOtKJznShK93oTg960ove9KEv/ejP
AAYyiMEMYSjDGM4IRjKK0YxhLOMYzwQmMonJTGEq05jODGYyi9nMYS7zmM8C
FrKIxSxhKctYzgpWsorVrGEt61jPBjayic1sYSvb2M4OdrKL3exhL/vYzwEO
cojDHOFXfuN3/uBP/uIoxzjOCU5yitOc4Szn+Jt/OM8FLnKJy1zhKte4zg1u
covb3OFf/uMu97jPAx7yiMc84SnPeM4LXvKK17zhLe94zwc+8onPfOEr3/jO
D34SOOQGC5x3CU4IQhKK0IQhLOEITwQiEonIRCEq0YhODGISi9jEIS7xiE8C
EpKIxCQhKclITgpSkorUpCEt6UhPBjKSicxkISvZyE4OcpKL3OQhL/nITwEK
UojCFKEoxShOCUpSitKUoSzlKE8FKgbOBVSmClWpRnVqUJNa1KYOdalHfRrQ
kEY0pglNaUZzWtCSVrSmDW1pR3s60JFOdKYLXelGd3rQk170pg996Ud/BjCQ
QQxmCEMZxnBGMJJRjGYMYxnHeCYwkUlMZgpTmcZ0ZjCTWcxmDnOZx3wWsJBF
LGYJS1nGclawklWsZg1rWcd6NrCRTWxmC1vZxnZ2sJNd7GYPe9nHfg5wkEMc
5gi/8hu/8wd/8hdHOcZxTnCSU5zmDGc5x9/8w3kucJFLXOYKV7nGdW5wk1vc
5g7/8h93ucd9HvAwsFbORR0oSmJC8TGwNrIX5UlLFDYziBpkYxejach+JnGI
R67/H/VJUJw=
       "]]}, 
     {GrayLevel[0], LineBox[CompressedData["
1:eJwV0Os+E3AYB/D/1mZjC9VC1DKHzpEOShTdgktwAdyMWyrSkRLVaEynFSua
aqX13Yvv5/k9z6vn88tNzUxOR0IIs2ylQ7gfC+EBc8zzkAUe8ZgnPOUZz1lk
iRe8ZJlXrLDKa97wljxrrPOOAhtsUmSL93zgI5/4TIkvfGWbHcp84zu77PGD
Cvv85Be/qfKHvxzwjxohHkKEKIeIEaeBBEkaaSJFmsM000IrRzjKMTIcp412
OjhBJ12c5BRZTtNNjh566aOfM5zlHOe5wEUucZkBBrnCEFe5xnVuMMxNbjHC
bUYZ4w53GWei/n9SB+wmdE6BPBm3GBW5RJEOe5KqXKZLTlGTs2YL9+p9mFH+
A15wTHs=
       "]], LineBox[CompressedData["
1:eJwV1mWbUFUAhdFLzBCCpCgKwqi0gAooBgLSDUM3DN3d3d3d3d1dQ3d3KAgI
goQgHa75sJ7znnt/wD5hES3Cm0cLgiAyehCkjh0ET2IFQUpnfO7oT51xeauv
87GOxUv9gKt85B7CM32Pm/wWEgT5yE8BClKIwhShKMUoTglKUorSlCGcspSj
PBWoSCUqU4WqVKM6NahJLWoTQR3qUo/6NKAhjWhME5rSjOa0oCWtaE0b2tKO
9nSgI53oTBe60o3u9KAnvehNH/rSj/4MYCCDGMwQhjKM4YxgJKMYzRjGMo7x
TGAik5jMFKYyjenMYCazmM0c5jKP+SxgIYtYzBKWsozlrGAlq1jNGtayjvVs
YCOb2MwWtrKN7exgJ7uIZDd72Ms+9nOAgxziMEc4yjGOc4KTnOI0ZzjLOc5z
gYtc4jJXuMo1fucPrnODP7nJLW7zF3e4y9/c4z7/8ICHPOIx//KEp/zHM57z
gpe84jVveMs73hOEBkE0ohODmIQQSixiE4e4fEA84vMhCUhIIhKThKR8RDI+
5hOS8ymfkYKUfE4qUhPGF3zJV6QhLelITwYykomvyUwWsvIN3/Id2chODr7n
B3LyIz/xM7+Qi1/JTR7y8hv5yE8BClKIwhShKMUoTglKUorSlCGcspSjPBWo
SCUqU4WqVKM6NahJLWoTQR3qUo/6NKAhjWhME5rSjOa0oCWtaE0b2tKO9nSg
I53oTBe60o3u9KAnvehNH/rSj/4MYCCDGMwQhjKM4YxgJKMYzRjGMo7xTGAi
k5jMFKYyjenMYCazmM0c5jKP+SxgIYtYzBKWsozlrGAlq1jNGtayjvVsYCOb
2MwWtrKN7exgJ7uIZDd72Ms+9nOAgxziMEc4yjGOc4KTnOI0ZzjLOc5zgYtc
4jJXuMo1fucPrnODP7nJLW7zF3e4y9/c4z7/8ICHPOIx//KEp/zHM57zgpe8
4jVveMs73hPYvmhEJwYxCSGUWMQmDnH5gHjE50MSkJBEJCYJSaP2lWRR28sn
JI/aZT4jRdRe8zmpSE0YX/AlX5GGtKQjPRnISCa+JjNZyMo3fMt3ZCM7Ofie
H8jJj/zEz/xCLn4lN3nIG7X/5CM/BShIIQpThKIUozglKEkpSlOGcMpSjvJU
oCKVqEwVqlKN6tSgJrWoTQR1qEs96tOAhjSiMU1oSjOa04KWtKI1bWhLO9rT
gY50ojNd6Eo3utODnvSiN33oSz/6M4CBDGIwQxjKMIYzgpGMYjRjGMs4xjOB
iUxiMlOYyjSmM4OZzGI2c5jLPOazgIUsYjFLWMoylrOClaxiNWtYyzrWs4GN
bGIzW9jKNrazg53sIpLd7GEv+9jPAQ5yiMMc4SjHOM4JTnKK05zhLOc4zwUu
cokk3pwxeKrvcoNrJPMtlOf6PrdI7h6H1/oRKXQ8AlKRkDAu+/c/fw57Kw==

       "]]}, 
     {GrayLevel[0], Thickness[Tiny], LineBox[CompressedData["
1:eJwV11PUl1kUB+Bvqsl2TZNt27Zt27Zt27ZrpmaybbumJrvJNc//4lm/i33O
evc6+5yLN1HjDpXb/xIUFLQ7RFBQ8tBBQVvDBwUNoSbZ+Z2IpFBLSSpSk4a0
pCM9GchIJjKThaxkIzs5yEkucpOHvOQjPwUoSCEKU4SiFKM4JShJKUpThrKU
ozwVqEglKlOFqlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOGtrSj
PR3oSCc604WudKM7PehJL3rTh770oz8DGMggBjOEoQxjOCMYyShGM4axjGM8
E5jIJCYzhalMYzozmMksZjOHucxjPgtYyCIWs4SlLGM5K1jJKlazhrWsYz0b
2MgmNrOFrWxjO3/wJzvYyV/8za7AGvdrKLXIQXwisTuwVw6jNjlJQGQOMJkW
FCMtewLfkcOpQy4SEoWDTKElxUnH3kBPcgR1yU0ionKIqbSiBOnZF+hfjqQe
eUjMKebSiQpE4zDTaE1JMnCWBXSjCvsDZyFHUZ+8XGIpvUnCaebRmYpE5wjT
aUMprrCCfmTkHAvpzm02UJVrrGYgd9gcOMfALORo7tGAm6wjH8vow0aS0oVK
rGIAm4jBUWZwn7bcYj2lucpK+pOJ8yyiB9W4zhoGBeYUuBdyDA3Jz2WW05dk
nGE+XalMTI4xk3aUITMXWExPqgdmGrhvciyNKEByYnGcWbSnLFkCM7R+txxH
YwqSgticYDYdKEfWwFys3yPH04RCpCRO4HzU9soJNKUwqYgb6F1tn5xIM4qQ
mt8Cfamd4CSnOM0ZznKO81zgIpe4zBWuco3r3OAmt7jNHe5yj/s84B8e8oh/
ecwTnvKM57zgJa94zRve8o73fOA/PvKJz3zhK9/4zg9+EhQmKOgXghGcEPxK
SEIRmjCEJRzhiUBEIhGZKEQlGtGJQUxiEZs4xOU34vE78UlAQhKRmCQkJRnJ
SUFKUpGaNKQlHenJQEYykZksZCUb2clBTnKRmzzkJR/5KUBBClGYIhSlGMUp
QUlKUZoylKUc5alARSpRmSpUpRrVqUFNalGbOtSlHvVpQEMa0ZgmNKUZzWlB
S1rRmja0pR3t6UBHOtGZLnSlG93pQU960Zs+9KUf/RnAQAYxmCEMZRjDGcFI
RjGaMYxlHOOZwEQmMZkpTGUa05nBTGYxmznMZR7zWcBCFrGYJSxlGctZwUpW
sZo1rGUd69nARjaxmS1sZRvb+YM/2cFO/uJvdrGbPexlH/s5wEEOcZgjHOUY
xznBSU5xmjOc5RznucBFLnGZK1zlGte5wU1ucZs73OUe93nAPzzkEf/ymCc8
5RnPecFLXvGaN7zlHe/5wH985BOf+cJXvvGdH/wkKKz3TzCCE4JfCUkoQhOG
sIQjPBGISCQiE4WoRCM6MYhJLGITh7j8Rjx+Jz4JSEgiEpOEpCQjOSlISSpS
k4a0pCM9GchIJjKThaxkIzs5yEkucpOHvOQjPwUoSCEKU4SiFKM4JShJKUpT
hrKUozwVqEglKlOFqlSjOjWoSS1qU4e61KM+DWhIIxrThKY0ozktaEkrWtOG
trSjPR3oSCc604WudKM7PehJL3rTh770oz8DGMggBjOEoQxjOCMYyShGM4ax
jGM8E5jIJCYzhalMYzozmMksZjOHucxjPgtYyCIWs4SlLGM5K1jJKlazhrWs
Yz0b2MgmNrOFrWxjO3/wJzvYyV/8zS52s4e97GM/BzjIIQ5zhKMc4zgnOMkp
TnOGs5zjPBe4yCUuc4WrXOM6N7jJLW5zh7vc4z4P+IeHPOJfHvOEpzzjOS94
ySte84a3vOM9H/iPj3ziM1/4yje+84OfBIXz/glGcELwKyEJRWjCEJZwhCcC
EYlEZKIQlWhEJwYxiUVs4hCX34jH78QnAQlJRGKSkJRkJCcFKUlFatKQlnSk
JwMZyURmspCVbGQnBznJRW7ykJd85KcABSlEYYpQlGIUpwQlKUVpylCWcpSn
AhWpRGWqUJVqVKcGNalFbepQl3rUpwENaURjmtCUZjSnBS1pRWva0JZ2tKcD
HelEZ7rQlW50pwc96UVv+tCXfvRnAAMZxGCGMJRhDGcEIxnFaMYwlnGMZwIT
mcRkpjCVaUxnBjOZxWzmMJd5zGcBC1nEYpawlGUsZwUrWcVq1rCWdaxnAxvZ
xGa2sJVtbOcP/mQHO/mLv9nFbvawl33s5wAHOcRhjnCUYxznBCc5xWnOcJZz
nOcCF7nEZa5wlWtc5wY3ucVt7nCXe9znAf/wkEf8y2Oe8JRnPOcFL3nFa97w
lne85wP/8ZFPfOYLX/nGd37wkyD/Nr8QjOCE4FdCEorQhCEs4QjPfibRnKKk
IR4nmUNHypONiyyhFzW4wVoGc5ctPCAC/wOpyZJr
       "]]}, 
     {GrayLevel[0.5], LineBox[{2084, 2085, 2083}]}}, {{}, {}, {}, {}, {}}}],
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["\"\[Gamma] \"", TraditionalForm], 
    FormBox["\"\[CapitalDelta]\"", TraditionalForm]},
  AxesOrigin->{0, 0},
  Method->{"AxesInFront" -> True},
  PlotRange->{{0, 1}, {0, 0.7}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], Automatic}]], "Output",
 CellChangeTimes->{{3.74064403992396*^9, 3.7406440590498514`*^9}, {
   3.7406441528615017`*^9, 3.740644159143183*^9}, {3.7406442149036283`*^9, 
   3.740644252161725*^9}, 3.7406443839362574`*^9, {3.7406444400044446`*^9, 
   3.7406444588024645`*^9}, 3.7406444894711018`*^9, 3.740644562546512*^9, {
   3.740644599163946*^9, 3.7406446341570563`*^9}, {3.7406446745344954`*^9, 
   3.7406447437186165`*^9}, {3.7406447816174603`*^9, 
   3.7406448021711154`*^9}, {3.7406448346425486`*^9, 3.740644893971381*^9}, {
   3.7406449266965046`*^9, 3.7406449462314725`*^9}, 3.740645044310446*^9, {
   3.74064507833899*^9, 3.740645089281071*^9}, {3.740645119883525*^9, 
   3.740645207297127*^9}, 3.740645250621393*^9, 3.7406677111592703`*^9, 
   3.740667747734586*^9, 3.7406678760610747`*^9, 3.740668091399023*^9, 
   3.7406681485932083`*^9, 3.7406682258197293`*^9, 3.740668256541443*^9, 
   3.7406683301322556`*^9, {3.740668462479421*^9, 3.7406685879572887`*^9}, {
   3.740668621000043*^9, 3.7406686359087124`*^9}, 3.740668669476031*^9, {
   3.740668708453745*^9, 3.740668752720532*^9}, {3.7406687827527776`*^9, 
   3.7406688167572584`*^9}, 3.74066888617549*^9, 3.7406767988295994`*^9, 
   3.7407317298694887`*^9, {3.740731818289897*^9, 3.7407318399665976`*^9}, 
   3.7407411169117374`*^9, {3.7407413636456275`*^9, 3.740741390068177*^9}, 
   3.740801339655592*^9, 3.7408266446468477`*^9, 3.740826788916519*^9, {
   3.7408268253474016`*^9, 3.7408269230291758`*^9}}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["Market-Shares", "Section",
 CellChangeTimes->{{3.6609772427701063`*^9, 3.660977245635023*^9}, {
   3.6953576318725967`*^9, 3.6953576323561993`*^9}, 3.7235333374468145`*^9, {
   3.7242473342897243`*^9, 3.7242473377307477`*^9}, {3.724247390075876*^9, 
   3.7242474036244593`*^9}, {3.7265552161009912`*^9, 
   3.7265552298439913`*^9}, {3.732889799276472*^9, 3.732889806527178*^9}, 
   3.7328898472823796`*^9, {3.7405754741090746`*^9, 3.7405754830549192`*^9}, {
   3.7406403195062027`*^9, 3.740640323315373*^9}, 3.740643969693086*^9, {
   3.740734470676487*^9, 3.740734478804489*^9}, 3.7407408443982964`*^9}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"As", " ", "exaplined", " ", "the", " ", "text"}], ",", " ", 
   RowBox[{
    RowBox[{
    "we", " ", "consider", " ", "the", " ", "case", " ", "in", " ", "which", 
     " ", "constraint", " ", 
     RowBox[{"(", "2", ")"}], " ", "q2"}], "\[LessEqual]", " ", 
    RowBox[{
    "K", " ", "does", " ", "not", " ", "bind", " ", "and", " ", "we", " ", 
     "consider", " ", "only", " ", "linear", " ", "prices"}]}], ",", " ", 
   RowBox[{
    RowBox[{"i", ".", "e", ".", " ", "\[Mu]"}], "\[Rule]", "Infinity"}]}], 
  "*)"}]], "Input",
 CellChangeTimes->{{3.7270665559446087`*^9, 3.727066590466008*^9}, {
  3.739711883295823*^9, 3.73971188417418*^9}, {3.7397140380686827`*^9, 
  3.739714060052189*^9}, {3.7407354133718357`*^9, 3.7407354350294695`*^9}, {
  3.740735572690552*^9, 3.740735596759541*^9}}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "We", " ", "now", " ", "determine", " ", "the", " ", "prices", " ", "with", 
   " ", "market", " ", "share", " ", 
   RowBox[{"(", "MS", ")"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7407354509801283`*^9, 3.7407354601121235`*^9}, {
  3.740736118523909*^9, 3.740736120046012*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "When", " ", "the", " ", "participation", " ", "constraint", " ", "does", 
    " ", "not", " ", 
    RowBox[{"bind", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
   "price", " ", "p2H", " ", "grants", " ", "the", " ", "market", " ", 
    "share"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"s", "==", 
      RowBox[{"q1", "/", 
       RowBox[{"(", 
        RowBox[{"q1", "+", "q2"}], ")"}]}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"BR2", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{"%", ",", "p2"}], "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
    "price", " ", "p1L", " ", "maximizes", " ", "the", " ", "profit", " ", 
     "of", " ", "firm", " ", "1"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"P1", "-", 
       RowBox[{"c", "*", " ", "q1"}]}], "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
        RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", 
     RowBox[{"p2", "\[Rule]", "BR2"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"p1MSnoConstr", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%", ",", "p1"}], "]"}], "\[Equal]", "0"}], ",", "p1"}], 
       "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"p2MSnoConstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"BR2", "/.", 
      RowBox[{"p1", "\[Rule]", "p1MSnoConstr"}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pMSnoConstr", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"p1", "->", "p1MSnoConstr"}], ",", 
       RowBox[{"p2", "->", "p2MSnoConstr"}]}], "}"}]}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.7270670308440084`*^9, 3.7270670740886087`*^9}, {
   3.7270671200646086`*^9, 3.727067231720208*^9}, 3.739711958426674*^9, {
   3.7397141837100005`*^9, 3.739714284426856*^9}, {3.7397143241304455`*^9, 
   3.739714346626259*^9}, {3.740735466131617*^9, 3.740735541563796*^9}, {
   3.740735627397606*^9, 3.740735631187439*^9}, {3.740735765417281*^9, 
   3.7407357867554502`*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"2", " ", "s"}]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}], "+", 
   RowBox[{"p1", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "s", "-", 
      RowBox[{"s", " ", "\[Gamma]"}]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"s", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}], "-", 
   "\[Gamma]"}]]], "Output",
 CellChangeTimes->{{3.7270670384432087`*^9, 3.727067051362008*^9}, 
   3.7270671295026083`*^9, {3.7270672101344085`*^9, 3.7270672323442087`*^9}, 
   3.727072448924406*^9, 3.7270944306551285`*^9, 3.7271805398351393`*^9, 
   3.7272669513411136`*^9, 3.7334838528692884`*^9, 3.733899699586376*^9, 
   3.733921132867584*^9, 3.7340691266431847`*^9, 3.7397119493294315`*^9, 
   3.7397142851417456`*^9, 3.7397143475607443`*^9, 3.739782225086717*^9, {
   3.74073560738488*^9, 3.740735632408896*^9}, 3.740741120231715*^9, 
   3.740741770524209*^9, 3.7408013426395197`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{"1", "+", "c"}], "2"]], "Output",
 CellChangeTimes->{{3.7270670384432087`*^9, 3.727067051362008*^9}, 
   3.7270671295026083`*^9, {3.7270672101344085`*^9, 3.7270672323442087`*^9}, 
   3.727072448924406*^9, 3.7270944306551285`*^9, 3.7271805398351393`*^9, 
   3.7272669513411136`*^9, 3.7334838528692884`*^9, 3.733899699586376*^9, 
   3.733921132867584*^9, 3.7340691266431847`*^9, 3.7397119493294315`*^9, 
   3.7397142851417456`*^9, 3.7397143475607443`*^9, 3.739782225086717*^9, {
   3.74073560738488*^9, 3.740735632408896*^9}, 3.740741120231715*^9, 
   3.740741770524209*^9, 3.7408013426425295`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "1"}], "+", "c", "+", 
   RowBox[{"3", " ", "s"}], "-", 
   RowBox[{"c", " ", "s"}], "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{"2", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "3"}], "+", "c"}], ")"}], " ", "s"}]}], ")"}], " ", 
    "\[Gamma]"}]}], 
  RowBox[{"2", " ", 
   RowBox[{"(", 
    RowBox[{"s", "+", "\[Gamma]", "-", 
     RowBox[{"s", " ", "\[Gamma]"}]}], ")"}]}]]], "Output",
 CellChangeTimes->{{3.7270670384432087`*^9, 3.727067051362008*^9}, 
   3.7270671295026083`*^9, {3.7270672101344085`*^9, 3.7270672323442087`*^9}, 
   3.727072448924406*^9, 3.7270944306551285`*^9, 3.7271805398351393`*^9, 
   3.7272669513411136`*^9, 3.7334838528692884`*^9, 3.733899699586376*^9, 
   3.733921132867584*^9, 3.7340691266431847`*^9, 3.7397119493294315`*^9, 
   3.7397142851417456`*^9, 3.7397143475607443`*^9, 3.739782225086717*^9, {
   3.74073560738488*^9, 3.740735632408896*^9}, 3.740741120231715*^9, 
   3.740741770524209*^9, 3.7408013427498126`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "When", " ", "instead", " ", "the", " ", "participation", " ", 
    "constraint", " ", "binds", " ", "the", " ", "prices", " ", "are", " ", 
    "deterined", " ", "as", " ", 
    RowBox[{"follows", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ProfitBE2k", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"v", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{"p2", " ", "q2"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"%", "\[Equal]", "%%"}], ",", "p1"}], "]"}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"N", "[", 
    RowBox[{"%", "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"d", "\[Rule]", "0.1"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.1"}], ",", 
       RowBox[{"s", "\[Rule]", "0.6"}], ",", 
       RowBox[{"k", "\[Rule]", "0.3"}], ",", 
       RowBox[{"p2", "\[Rule]", "0.5"}]}], "}"}]}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"sembra", " ", "la", " ", "prima", " ", "soluzione"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"tmpconstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"p1", "==", 
          RowBox[{"%%", "[", 
           RowBox[{"[", 
            RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], ",", 
         RowBox[{"p2", "==", "BR2"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"p1", ",", "p2"}], "}"}]}], "]"}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"N", "[", 
    RowBox[{"%", "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"d", "\[Rule]", "0.1"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.1"}], ",", 
       RowBox[{"s", "\[Rule]", "0.6"}], ",", 
       RowBox[{"k", "\[Rule]", "0.3"}]}], "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7270672427800083`*^9, 3.727067446000408*^9}, {
   3.7270718683080063`*^9, 3.7270719407076063`*^9}, {3.7270719779604063`*^9, 
   3.727072004293206*^9}, 3.727072440687606*^9, 3.733972165704808*^9, {
   3.7397147408516665`*^9, 3.7397147593598795`*^9}, {3.740735733426482*^9, 
   3.7407357560657644`*^9}, 3.7407357973799877`*^9, {3.7407358702278366`*^9, 
   3.7407358784844913`*^9}, {3.740739776963521*^9, 3.740739787711537*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "\[Gamma]"}], "-", 
      SqrtBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}], " ", "k"}], "+", 
          SuperscriptBox["k", "2"], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "p2"}], ")"}], "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "p2"}], ")"}], " ", "\[Gamma]"}], "+", 
      SqrtBox[
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}], " ", "k"}], "+", 
          SuperscriptBox["k", "2"], "+", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "p2"}], ")"}], "2"]}], ")"}], " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]]}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.727067300157008*^9, 3.7270673215330086`*^9}, {
   3.727067355899208*^9, 3.7270673686262083`*^9}, {3.727067420055208*^9, 
   3.7270674305590086`*^9}, {3.727071911754006*^9, 3.7270719415344057`*^9}, 
   3.727072004932806*^9, 3.7270724420604057`*^9, 3.7270944309671288`*^9, {
   3.72718070866546*^9, 3.727180730037122*^9}, 3.7272669650090265`*^9, 
   3.7337141913119*^9, 3.7338997121507845`*^9, 3.733921145601445*^9, 
   3.7340691347706804`*^9, 3.7397133042373753`*^9, 3.739714783142125*^9, 
   3.739782225678257*^9, 3.740735889737178*^9, 3.7407397886032047`*^9, 
   3.740741120870247*^9, 3.7407417709979267`*^9, 3.740801343244128*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", "0.5050280907742601`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", "1.3949719092257398`"}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.727067300157008*^9, 3.7270673215330086`*^9}, {
   3.727067355899208*^9, 3.7270673686262083`*^9}, {3.727067420055208*^9, 
   3.7270674305590086`*^9}, {3.727071911754006*^9, 3.7270719415344057`*^9}, 
   3.727072004932806*^9, 3.7270724420604057`*^9, 3.7270944309671288`*^9, {
   3.72718070866546*^9, 3.727180730037122*^9}, 3.7272669650090265`*^9, 
   3.7337141913119*^9, 3.7338997121507845`*^9, 3.733921145601445*^9, 
   3.7340691347706804`*^9, 3.7397133042373753`*^9, 3.739714783142125*^9, 
   3.739782225678257*^9, 3.740735889737178*^9, 3.7407397886032047`*^9, 
   3.740741120870247*^9, 3.7407417709979267`*^9, 3.7408013432461343`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"p1", "\[Rule]", 
      RowBox[{"1", "+", 
       FractionBox[
        RowBox[{
         SqrtBox[
          RowBox[{"k", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}],
             ")"}], " ", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"1", "+", 
              RowBox[{"s", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}], 
            "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}]}]], 
         " ", "\[Gamma]"}], 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]], "-", 
       SqrtBox[
        FractionBox[
         RowBox[{"k", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
           ")"}], " ", 
          SuperscriptBox["s", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}], "2"]}], 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}]}], ",", 
     RowBox[{"p2", "\[Rule]", 
      RowBox[{"1", "+", 
       FractionBox[
        SqrtBox[
         RowBox[{"k", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
           ")"}], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}], "2"],
           " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", 
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}]}]], 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]}]}]}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"p1", "\[Rule]", 
      RowBox[{"1", "-", 
       FractionBox[
        RowBox[{
         SqrtBox[
          RowBox[{"k", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}],
             ")"}], " ", 
           SuperscriptBox[
            RowBox[{"(", 
             RowBox[{"1", "+", 
              RowBox[{"s", " ", 
               RowBox[{"(", 
                RowBox[{
                 RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}], 
            "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}]}]], 
         " ", "\[Gamma]"}], 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]], "-", 
       SqrtBox[
        FractionBox[
         RowBox[{"k", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
           ")"}], " ", 
          SuperscriptBox["s", "2"], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             SuperscriptBox["\[Gamma]", "2"]}], ")"}], "2"]}], 
         RowBox[{
          RowBox[{"-", "1"}], "+", 
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}]}], ",", 
     RowBox[{"p2", "\[Rule]", 
      RowBox[{"1", "-", 
       FractionBox[
        SqrtBox[
         RowBox[{"k", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
           ")"}], " ", 
          SuperscriptBox[
           RowBox[{"(", 
            RowBox[{"1", "+", 
             RowBox[{"s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}], "2"],
           " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", 
            RowBox[{"2", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}]}]], 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]}]}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.727067300157008*^9, 3.7270673215330086`*^9}, {
   3.727067355899208*^9, 3.7270673686262083`*^9}, {3.727067420055208*^9, 
   3.7270674305590086`*^9}, {3.727071911754006*^9, 3.7270719415344057`*^9}, 
   3.727072004932806*^9, 3.7270724420604057`*^9, 3.7270944309671288`*^9, {
   3.72718070866546*^9, 3.727180730037122*^9}, 3.7272669650090265`*^9, 
   3.7337141913119*^9, 3.7338997121507845`*^9, 3.733921145601445*^9, 
   3.7340691347706804`*^9, 3.7397133042373753`*^9, 3.739714783142125*^9, 
   3.739782225678257*^9, 3.740735889737178*^9, 3.7407397886032047`*^9, 
   3.740741120870247*^9, 3.7407417709979267`*^9, 3.7408013531835594`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"p1", "\[Rule]", "0.4303448040669505`"}], ",", 
     RowBox[{"p2", "\[Rule]", "0.5905603279231206`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"p1", "\[Rule]", "0.5122327384823263`"}], ",", 
     RowBox[{"p2", "\[Rule]", "1.4094396720768794`"}]}], "}"}]}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.727067300157008*^9, 3.7270673215330086`*^9}, {
   3.727067355899208*^9, 3.7270673686262083`*^9}, {3.727067420055208*^9, 
   3.7270674305590086`*^9}, {3.727071911754006*^9, 3.7270719415344057`*^9}, 
   3.727072004932806*^9, 3.7270724420604057`*^9, 3.7270944309671288`*^9, {
   3.72718070866546*^9, 3.727180730037122*^9}, 3.7272669650090265`*^9, 
   3.7337141913119*^9, 3.7338997121507845`*^9, 3.733921145601445*^9, 
   3.7340691347706804`*^9, 3.7397133042373753`*^9, 3.739714783142125*^9, 
   3.739782225678257*^9, 3.740735889737178*^9, 3.7407397886032047`*^9, 
   3.740741120870247*^9, 3.7407417709979267`*^9, 3.740801353185566*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "We", " ", "need", " ", "some", " ", "simplifications", " ", "of", " ", 
    "these", " ", "prices"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"pMSConstr", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"p1", "\[Rule]", 
        RowBox[{"1", "-", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "+", 
            RowBox[{"s", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}], 
          "\[Gamma]", 
          SqrtBox[
           FractionBox[
            RowBox[{"k", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"2", " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", 
               "k"}], ")"}], " "}], 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}], "+", 
         RowBox[{"s", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", 
            SuperscriptBox["\[Gamma]", "2"]}], ")"}], 
          SqrtBox[
           FractionBox[
            RowBox[{"k", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"2", " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", 
               "k"}], ")"}], " "}], 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}]}]}], ",", 
       RowBox[{"p2", "\[Rule]", 
        RowBox[{"1", "-", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "+", 
            RowBox[{"s", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}], 
          SqrtBox[
           FractionBox[
            RowBox[{"k", " ", 
             RowBox[{"(", 
              RowBox[{
               RowBox[{"2", " ", 
                RowBox[{"(", 
                 RowBox[{
                  RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", 
               "k"}], ")"}], " "}], 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             RowBox[{"2", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
              RowBox[{"(", 
               RowBox[{
                RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}]}]}]}], 
      "}"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"N", "[", 
    RowBox[{"%", "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"c", "\[Rule]", "0"}], ",", 
       RowBox[{"d", "\[Rule]", "0.1"}], ",", 
       RowBox[{"\[Gamma]", "\[Rule]", "0.1"}], ",", 
       RowBox[{"s", "\[Rule]", "0.6"}], ",", 
       RowBox[{"k", "\[Rule]", "0.3"}]}], "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.740739815927204*^9, 3.7407399340641737`*^9}, {
  3.740740101358989*^9, 3.740740133220702*^9}, {3.7407417592438507`*^9, 
  3.7407417605407095`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"p1", "\[Rule]", "0.4303448040669505`"}], ",", 
   RowBox[{"p2", "\[Rule]", "0.5905603279231206`"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.7407399103334866`*^9, 3.740739934448928*^9}, {
   3.7407401025940557`*^9, 3.7407401342900095`*^9}, {3.7407417614567966`*^9, 
   3.740741779247761*^9}, 3.74080135330993*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "We", " ", "show", " ", "that", " ", "both", " ", "unconstrained", " ", 
     "and", " ", "constrained", " ", "MS", " ", "prices", " ", "converge", 
     " ", "to", " ", "the", " ", "exclusive", " ", "price", " ", "for", " ", 
     "s"}], "\[Rule]", "1"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"pMSConstr", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"Limit", "[", 
      RowBox[{"%", ",", 
       RowBox[{"s", "\[Rule]", "1"}]}], "]"}], ",", 
     RowBox[{"1", ">", "\[Gamma]", ">", "0"}]}], "]"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"pMSnoConstr", "[", 
      RowBox[{"[", 
       RowBox[{"1", ",", "2"}], "]"}], "]"}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{
     RowBox[{"Limit", "[", 
      RowBox[{"%", ",", 
       RowBox[{"s", "\[Rule]", "1"}]}], "]"}], ",", 
     RowBox[{"1", ">", "\[Gamma]", ">", "0"}]}], "]"}], "\[IndentingNewLine]",
    "\[IndentingNewLine]", 
   RowBox[{"Limit", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"p1Eequcorn", ",", " ", "p1m"}], "}"}], ",", 
     RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7337162233567767`*^9, 3.733716337664777*^9}, 
   3.7337164876567764`*^9, {3.7337167025687766`*^9, 3.7337167074287767`*^9}, {
   3.7337173858037767`*^9, 3.7337173966757765`*^9}, 3.739714882708913*^9, {
   3.7397149297810955`*^9, 3.7397149616267853`*^9}, {3.7397150016732855`*^9, 
   3.7397150091482096`*^9}, {3.740735980010486*^9, 3.7407360828474426`*^9}}],

Cell[BoxData[
 RowBox[{"1", "-", 
  SqrtBox[
   RowBox[{
    RowBox[{"-", "k"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
     ")"}]}]]}]], "Output",
 CellChangeTimes->{{3.7337162439757767`*^9, 3.7337162766327763`*^9}, {
   3.7337163139507766`*^9, 3.733716343440777*^9}, 3.7337164929297767`*^9, 
   3.7337167136067767`*^9, {3.733717390973777*^9, 3.7337174019607763`*^9}, 
   3.7338997277653027`*^9, 3.733899837060923*^9, 3.733917223923309*^9, 
   3.733921161232006*^9, 3.7340691461741343`*^9, 3.739714861353118*^9, 
   3.739715015467971*^9, 3.739782238518405*^9, {3.740735999162183*^9, 
   3.7407360290984926`*^9}, {3.7407360658706493`*^9, 3.740736083394845*^9}, 
   3.7407401540478253`*^9, 3.7407411302372894`*^9, {3.7407417668689537`*^9, 
   3.740741779484682*^9}, 3.7408013557343445`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{"1", "+", "c"}], "2"]], "Output",
 CellChangeTimes->{{3.7337162439757767`*^9, 3.7337162766327763`*^9}, {
   3.7337163139507766`*^9, 3.733716343440777*^9}, 3.7337164929297767`*^9, 
   3.7337167136067767`*^9, {3.733717390973777*^9, 3.7337174019607763`*^9}, 
   3.7338997277653027`*^9, 3.733899837060923*^9, 3.733917223923309*^9, 
   3.733921161232006*^9, 3.7340691461741343`*^9, 3.739714861353118*^9, 
   3.739715015467971*^9, 3.739782238518405*^9, {3.740735999162183*^9, 
   3.7407360290984926`*^9}, {3.7407360658706493`*^9, 3.740736083394845*^9}, 
   3.7407401540478253`*^9, 3.7407411302372894`*^9, {3.7407417668689537`*^9, 
   3.740741779484682*^9}, 3.740801355737352*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"1", "-", 
    SqrtBox[
     RowBox[{
      RowBox[{"-", "k"}], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "2"}], "+", 
        RowBox[{"2", " ", "c"}], "+", 
        RowBox[{"2", " ", "d"}], "+", "k"}], ")"}]}]]}], ",", 
   FractionBox[
    RowBox[{"1", "+", "c"}], "2"]}], "}"}]], "Output",
 CellChangeTimes->{{3.7337162439757767`*^9, 3.7337162766327763`*^9}, {
   3.7337163139507766`*^9, 3.733716343440777*^9}, 3.7337164929297767`*^9, 
   3.7337167136067767`*^9, {3.733717390973777*^9, 3.7337174019607763`*^9}, 
   3.7338997277653027`*^9, 3.733899837060923*^9, 3.733917223923309*^9, 
   3.733921161232006*^9, 3.7340691461741343`*^9, 3.739714861353118*^9, 
   3.739715015467971*^9, 3.739782238518405*^9, {3.740735999162183*^9, 
   3.7407360290984926`*^9}, {3.7407360658706493`*^9, 3.740736083394845*^9}, 
   3.7407401540478253`*^9, 3.7407411302372894`*^9, {3.7407417668689537`*^9, 
   3.740741779484682*^9}, 3.740801355790493*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "The", " ", "boundary", " ", "for", " ", "the", " ", "two", " ", "price", 
    " ", 
    RowBox[{"cases", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"pMSnoConstr", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2"}], "]"}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"pMSConstr", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "2"}], "]"}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{
       RowBox[{"%", "-", "%%"}], ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1.1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}], ",", 
       RowBox[{"FrameLabel", "\[Rule]", 
        RowBox[{"{", 
         RowBox[{"\"\<k\>\"", ",", "\"\<c2-c1=d\>\""}], "}"}]}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0.5", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], 
      "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.739768151967462*^9, 3.7397682336016035`*^9}, {
  3.739768278145017*^9, 3.739768293245175*^9}, {3.7407361459757376`*^9, 
  3.7407361576274767`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0.5, 1}, {{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$273301$$ = 
    0, $CellContext`s$273302$$ = 0, $CellContext`\[Gamma]$273303$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.5}, "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$273301$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$273302$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$273303$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[(
         1 - (1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
            2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k)/(-1 + 
           2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
          Rational[
           1, 2] $CellContext`\[Gamma]$$ + $CellContext`s$$ ($CellContext`k (
             2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k)/(-1 + 
            2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^Rational[1, 2] (-1 + $CellContext`\[Gamma]$$^2)) - 
        Rational[1, 2] (1 + $CellContext`c$$), {$CellContext`k, 0, 
         1}, {$CellContext`d, 0, 1.1}, Contours -> {0}, 
        FrameLabel -> {"k", "c2-c1=d"}], 
      "Specifications" :> {{$CellContext`c$$, 0, 1}, {{$CellContext`s$$, 1}, 
         0.5, 1}, {{$CellContext`\[Gamma]$$, 0.5}, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.7397681771313834`*^9, 3.739768234349554*^9}, 
   3.739768304434946*^9, 3.7397822386297016`*^9, 3.740736159519041*^9, 
   3.7407401658977003`*^9, 3.740741130495097*^9, 3.7407417795533032`*^9, 
   3.7408013559248505`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Now", " ", "we", " ", "show", " ", "that", " ", "for", " ", 
     "sufficiently", " ", "large", " ", "k", " ", "and", " ", "s"}], ",", " ", 
    RowBox[{"as", " ", "state", " ", "in", " ", "the", " ", "paper"}], ",", 
    " ", 
    RowBox[{"constraint", " ", 
     RowBox[{"(", "2", ")"}], " ", "does", " ", "not", " ", 
     RowBox[{"bind", "."}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"q2NE", "/.", "pMSnoConstr"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{
       RowBox[{"k", "-", "%"}], ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0.001", ",", "1.1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.8"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", 
         RowBox[{"{", "0.9", "}"}]}], "}"}], ",", "0", ",", "1"}], "}"}]}], 
    "]"}], "\[IndentingNewLine]", 
   RowBox[{"kq2noConstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{"q2NE", "/.", "pMSnoConstr"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7397685345288486`*^9, 3.739768544235702*^9}, {
  3.739769108246704*^9, 3.7397691734791355`*^9}, {3.7397694221615047`*^9, 
  3.739769439563796*^9}, {3.740736241671467*^9, 3.7407363053459635`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = {
    0.9}, $CellContext`\[Gamma]$$ = 0.8, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Gamma]$$], 0.8}, 0, 1}, {{
       Hold[$CellContext`s$$], {0.9}}, 0, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$273324$$ = 
    0, $CellContext`\[Gamma]$273325$$ = 0, $CellContext`s$273326$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 
        0, $CellContext`s$$ = {0.9}, $CellContext`\[Gamma]$$ = 0.8}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$273324$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$273325$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$273326$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[$CellContext`k - (-1 + $CellContext`\[Gamma]$$^2)^(-1) (-1 + \
$CellContext`\[Gamma]$$ + 
         Rational[-1, 2] (1 + $CellContext`c$$) $CellContext`\[Gamma]$$ + 
         Rational[
           1, 2] ($CellContext`s$$ + $CellContext`\[Gamma]$$ - \
$CellContext`s$$ $CellContext`\[Gamma]$$)^(-1) (-1 + $CellContext`c$$ + 
           3 $CellContext`s$$ - $CellContext`c$$ $CellContext`s$$ + (
             2 + (-3 + $CellContext`c$$) $CellContext`s$$) $CellContext`\
\[Gamma]$$)), {$CellContext`k, 0.001, 1.1}, {$CellContext`d, 0, 1}, 
        Contours -> {0}], 
      "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Gamma]$$, 0.8}, 0, 
         1}, {{$CellContext`s$$, {0.9}}, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.739768545087922*^9, 3.7397694403388205`*^9, 3.739782245572163*^9, {
   3.7407362915201197`*^9, 3.74073630592475*^9}, 3.740740175177506*^9, 
   3.7407411310438204`*^9, 3.740741779640036*^9, 3.7408013559840083`*^9}],

Cell[BoxData[
 FractionBox[
  RowBox[{
   RowBox[{"-", "1"}], "+", "c", "+", "s", "-", 
   RowBox[{"c", " ", "s"}]}], 
  RowBox[{
   RowBox[{"2", " ", "s", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}], "-", 
   RowBox[{"2", " ", "\[Gamma]"}]}]]], "Output",
 CellChangeTimes->{
  3.739768545087922*^9, 3.7397694403388205`*^9, 3.739782245572163*^9, {
   3.7407362915201197`*^9, 3.74073630592475*^9}, 3.740740175177506*^9, 
   3.7407411310438204`*^9, 3.740741779640036*^9, 3.7408013559950714`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"FullSimplify", "[", 
   RowBox[{
    RowBox[{"k", "-", "q2NE"}], "/.", "pMSConstr"}], "]"}], 
  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"ContourPlot", "[", 
    RowBox[{"%", ",", 
     RowBox[{"{", 
      RowBox[{"k", ",", "0.001", ",", "1.1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"Contours", "\[Rule]", 
      RowBox[{"{", "0", "}"}]}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Gamma]", ",", "0.8"}], "}"}], ",", "0", ",", "1"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"s", ",", "1"}], "}"}], ",", "0", ",", "1"}], "}"}]}], 
  "]"}]}], "Input",
 CellChangeTimes->{{3.7407363994657307`*^9, 3.740736449085032*^9}, {
   3.740736495980157*^9, 3.740736496481311*^9}, 3.7407365505459566`*^9, {
   3.7407366567605705`*^9, 3.7407366572196674`*^9}, {3.7407368458631563`*^9, 
   3.7407368887510147`*^9}, {3.7407401903435535`*^9, 3.740740193398011*^9}}],

Cell[BoxData[
 RowBox[{"k", "+", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", 
   SqrtBox[
    FractionBox[
     RowBox[{"k", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"2", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
       ")"}]}], 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}]}]], "Output",
 CellChangeTimes->{{3.74073639639565*^9, 3.740736460649085*^9}, 
   3.740736501014634*^9, 3.740736550957056*^9, 3.7407366579867687`*^9, 
   3.7407368583718233`*^9, 3.74073689571462*^9, {3.740740194241829*^9, 
   3.740740223340389*^9}, 3.740741131399669*^9, 3.7407417799477034`*^9, 
   3.7408013562537255`*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.8, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Gamma]$$], 0.8}, 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$273467$$ = 
    0, $CellContext`\[Gamma]$273468$$ = 0, $CellContext`s$273469$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.8}, "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$273467$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$273468$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$273469$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[$CellContext`k + (-1 + $CellContext`s$$) ($CellContext`k (
            2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k)/(-1 + 
           2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^Rational[1, 2], {$CellContext`k, 0.001, 1.1}, {$CellContext`d, 
         0, 1}, Contours -> {0}], 
      "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Gamma]$$, 0.8}, 0, 1}, {{$CellContext`s$$, 1}, 
         0, 1}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.74073639639565*^9, 3.740736460649085*^9}, 
   3.740736501014634*^9, 3.740736550957056*^9, 3.7407366579867687`*^9, 
   3.7407368583718233`*^9, 3.74073689571462*^9, {3.740740194241829*^9, 
   3.740740223340389*^9}, 3.740741131399669*^9, 3.7407417799477034`*^9, 
   3.740801356263752*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
    RowBox[{
    "This", " ", "shows", " ", "how", " ", "to", " ", "take", " ", "large", 
     " ", "s", " ", "and", " ", "k", " ", "so", " ", "that", " ", 
     "constraint", " ", "q2"}], "\[LessEqual]", " ", 
    RowBox[{"K", " ", "does", " ", "not", " ", "bind"}]}], ",", " ", 
   RowBox[{
   "both", " ", "when", " ", "the", " ", "prices", " ", "are", " ", 
    "constraint", " ", "or", " ", "not", " ", 
    RowBox[{"constrained", "."}]}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.740736926590267*^9, 3.740736948095707*^9}, {
   3.7407370013975143`*^9, 3.740737010447073*^9}, 3.74073730879517*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Now", " ", "we", " ", "show", " ", "where", " ", "the", " ", "two", " ", 
    "cases", " ", "apply"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"pMSnoConstr", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2"}], "]"}], "]"}], "-", 
      RowBox[{"pMSConstr", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "}"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{"ContourPlot", "[", 
       RowBox[{"%", ",", 
        RowBox[{"{", 
         RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
        RowBox[{"Contours", "\[Rule]", 
         RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", "]"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0.5", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.739765265094084*^9, 3.7397653135680013`*^9}, {
  3.7397679224509363`*^9, 3.7397679417795353`*^9}, {3.740737280388691*^9, 
  3.740737298338419*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0.5, 1}}, Typeset`size$$ = {
    720., {348., 369.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$273490$$ = 
    0, $CellContext`c$273491$$ = 0, $CellContext`s$273492$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.5}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$273490$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$273491$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$273492$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Show[
        ContourPlot[{-1 + 
          Rational[1, 2] (1 + $CellContext`c$$) + (
            1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
              2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
             2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
            Rational[
             1, 2] $CellContext`\[Gamma]$$ - $CellContext`s$$ ($CellContext`k \
(2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k)/(-1 + 
            2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
           Rational[1, 2] (-1 + $CellContext`\[Gamma]$$^2)}, {$CellContext`k, 
          0, 1.1}, {$CellContext`d, 0, 1}, Contours -> {0}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {$CellContext`c$$, 0, 1}, {{$CellContext`s$$, 1}, 0.5, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{810., {497., 508.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.7397652696803102`*^9, {3.7397653011439686`*^9, 3.7397653142267914`*^9}, {
   3.7397679294094343`*^9, 3.739767942178549*^9}, 3.7397822501373587`*^9, {
   3.740737288468582*^9, 3.7407372989325943`*^9}, 3.7407402311346045`*^9, 
   3.740741132171036*^9, 3.74074178008989*^9, 3.7408013563369474`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "In", " ", "the", " ", "dark", " ", "region", " ", "the", " ", 
   "unconstrained", " ", "price", " ", 
   RowBox[{"applies", "."}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.727072719678006*^9, 3.727072729896006*^9}, {
  3.740737318627678*^9, 3.7407373345879335`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "With", " ", "some", " ", "simplifications", " ", "the", " ", "two", " ", 
    "cases", " ", "are", " ", "separated", " ", "by", " ", "this", " ", 
    "boundary"}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"dMSConstNoConstr", "=", 
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{"Solve", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"pMSnoConstr", "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}], "-", 
         RowBox[{"pMSConstr", "[", 
          RowBox[{"[", 
           RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "\[Equal]", "0"}], ",", 
       "d"}], "]"}], "]"}], "[", 
    RowBox[{"[", 
     RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7407389580583115`*^9, 3.7407390713011503`*^9}, 
   3.7407402548252215`*^9}],

Cell[BoxData[
 RowBox[{
  FractionBox["1", "8"], " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{
     RowBox[{"-", "4"}], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "2"}], "+", 
       RowBox[{"2", " ", "c"}], "+", "k"}], ")"}]}], "+", 
    FractionBox[
     RowBox[{"2", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c"}], ")"}], "2"], " ", "s"}], 
     RowBox[{
      RowBox[{
       RowBox[{"-", "k"}], " ", "s"}], "+", 
      RowBox[{"k", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "\[Gamma]"}]}]], "+", 
    FractionBox[
     RowBox[{
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "c"}], ")"}], "2"], " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        RowBox[{"2", " ", "s"}]}], ")"}]}], 
     RowBox[{"k", " ", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"s", "+", "\[Gamma]", "-", 
         RowBox[{"s", " ", "\[Gamma]"}]}], ")"}], "2"]}]]}], 
   ")"}]}]], "Output",
 CellChangeTimes->{{3.740738955362918*^9, 3.740738972755045*^9}, {
   3.7407390239811907`*^9, 3.7407390322608914`*^9}, 3.740739071772393*^9, 
   3.7407402580114355`*^9, 3.740741132878251*^9, 3.740741781245239*^9, 
   3.7408013576945896`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Now", " ", "we", " ", "identify", " ", "the", " ", "anticompetitive", " ", 
   RowBox[{"areas", ":"}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.727072355683206*^9, 3.727072372749606*^9}, {
  3.7407386128076515`*^9, 3.740738622302133*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", "Definitions", "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"ProfitBMSNoConstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"v", "-", 
        RowBox[{"p1", " ", "q1"}], "-", 
        RowBox[{"p2", " ", "q2"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
         RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", "pMSnoConstr"}], 
     "]"}]}], "\[IndentingNewLine]", 
   RowBox[{"ProfitBMSConstr", "=", 
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"v", "-", 
        RowBox[{"p1", " ", "q1"}], "-", 
        RowBox[{"p2", " ", "q2"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
         RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", "pMSConstr"}], 
     "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.7270727537640057`*^9, 3.727072827177606*^9}, 
   3.727074666859406*^9, {3.74073804130647*^9, 3.7407380428397803`*^9}, {
   3.7407386318161*^9, 3.7407386334373627`*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c"}], ")"}], "2"], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}], ")"}]}], 
   RowBox[{"8", " ", 
    SuperscriptBox[
     RowBox[{"(", 
      RowBox[{"s", "+", "\[Gamma]", "-", 
       RowBox[{"s", " ", "\[Gamma]"}]}], ")"}], "2"]}]]}]], "Output",
 CellChangeTimes->{
  3.727072768833606*^9, {3.727072801734006*^9, 3.7270728277392063`*^9}, 
   3.7270944415091286`*^9, 3.727184913822763*^9, 3.727267043738516*^9, 
   3.7397654895159073`*^9, 3.739782250324833*^9, 3.7407380526895103`*^9, 
   3.740740265891304*^9, 3.7407411330006423`*^9, 3.7407417813745737`*^9, 
   3.740801357875037*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"-", 
   FractionBox["1", "2"]}], " ", "k", " ", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"2", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
   ")"}]}]], "Output",
 CellChangeTimes->{
  3.727072768833606*^9, {3.727072801734006*^9, 3.7270728277392063`*^9}, 
   3.7270944415091286`*^9, 3.727184913822763*^9, 3.727267043738516*^9, 
   3.7397654895159073`*^9, 3.739782250324833*^9, 3.7407380526895103`*^9, 
   3.740740265891304*^9, 3.7407411330006423`*^9, 3.7407417813745737`*^9, 
   3.7408013579482336`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"In", " ", "the", " ", "constrained", " ", "case"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"ProfitBNE", "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"F1", "\[Rule]", "0"}], ",", 
        RowBox[{"F2", "\[Rule]", "0"}]}], "}"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
       RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Limit", "[", 
     RowBox[{"%", ",", 
      RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ProfitBMSConstr", "-", "%"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{"ContourPlot", "[", 
       RowBox[{"%", ",", 
        RowBox[{"{", 
         RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
        RowBox[{"Contours", "\[Rule]", 
         RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", "]"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0.5", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{
  3.7407384560174785`*^9, {3.7407385553699336`*^9, 3.7407385992539196`*^9}, {
   3.740738637390459*^9, 3.740738651471959*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0.5, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$276056$$ = 
    0, $CellContext`c$276057$$ = 0, $CellContext`s$276058$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.5}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$276056$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$276057$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$276058$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Show[
        ContourPlot[
        Rational[-1, 2] $CellContext`k (
           2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k) + 
         Rational[-1, 
            2] (-4 + $CellContext`\[Gamma]$$^2)^(-2) (-1 + $CellContext`\
\[Gamma]$$^2)^(-1) (
           2 (-1 + $CellContext`\[Gamma]$$) (2 + $CellContext`\[Gamma]$$)^2 + 
           2 $CellContext`c$$^2 (-1 + $CellContext`\[Gamma]$$) (
              2 + $CellContext`\[Gamma]$$)^2 + 
           2 $CellContext`c$$ (-2 + $CellContext`d) (-1 + $CellContext`\
\[Gamma]$$) (2 + $CellContext`\[Gamma]$$)^2 - 
           2 $CellContext`d (-1 + $CellContext`\[Gamma]$$) (
             2 + $CellContext`\[Gamma]$$)^2 + $CellContext`d^2 (-4 + 
             3 $CellContext`\[Gamma]$$^2)), {$CellContext`k, 0, 
          1.1}, {$CellContext`d, 0, 1}, Contours -> {0}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {$CellContext`c$$, 0, 1}, {{$CellContext`s$$, 1}, 0.5, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.7407384583154697`*^9, {3.7407385645844307`*^9, 3.7407385999242964`*^9}, 
   3.740740272383342*^9, 3.74074113335598*^9, 3.740741781560068*^9, 
   3.740801358092615*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"In", " ", "the", " ", "unconstrained", " ", "case"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"ProfitBNE", "/.", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"F1", "\[Rule]", "0"}], ",", 
        RowBox[{"F2", "\[Rule]", "0"}]}], "}"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
       RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ProfitBNElinear", "=", 
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Limit", "[", 
       RowBox[{"%", ",", 
        RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ProfitBMSNoConstr", "-", "ProfitBNElinear"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{"ContourPlot", "[", 
       RowBox[{"%", ",", 
        RowBox[{"{", 
         RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
        RowBox[{"Contours", "\[Rule]", 
         RowBox[{"{", "0", "}"}]}]}], "]"}], "\[IndentingNewLine]", "]"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0.5", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.739770197717991*^9, 3.739770206241659*^9}, {
  3.7407381533329096`*^9, 3.7407382786948705`*^9}, {3.7407384234161267`*^9, 
  3.740738426975194*^9}, {3.74073866016156*^9, 3.74073868436857*^9}, {
  3.740739187598956*^9, 3.740739220618596*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0.5, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$276618$$ = 
    0, $CellContext`c$276619$$ = 0, $CellContext`s$276620$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.5}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$276618$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$276619$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$276620$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Show[
        ContourPlot[
        Rational[-1, 8] (-1 + $CellContext`c$$)^2 (-1 + 
           2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)) ($CellContext`s$$ + $CellContext`\[Gamma]$$ - $CellContext`s$$ \
$CellContext`\[Gamma]$$)^(-2) + 
         Rational[-1, 
            2] (-4 + $CellContext`\[Gamma]$$^2)^(-2) (-1 + $CellContext`\
\[Gamma]$$^2)^(-1) ((-8) (-1 + $CellContext`c$$)^2 - 
           8 (-1 + $CellContext`c$$) $CellContext`d - 4 $CellContext`d^2 + 
           3 (2 (-1 + $CellContext`c$$)^2 + 
             2 (-1 + $CellContext`c$$) $CellContext`d + $CellContext`d^2) \
$CellContext`\[Gamma]$$^2 + 
           2 (-1 + $CellContext`c$$) (-1 + $CellContext`c$$ + $CellContext`d) \
$CellContext`\[Gamma]$$^3), {$CellContext`k, 0, 1.1}, {$CellContext`d, 0, 1}, 
         Contours -> {0}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {$CellContext`c$$, 0, 1}, {{$CellContext`s$$, 1}, 0.5, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.739770206973604*^9, 3.7397822505163116`*^9, {3.740738150119811*^9, 
   3.7407381537181077`*^9}, {3.740738242384803*^9, 3.7407382642040377`*^9}, 
   3.7407384277024307`*^9, {3.7407386739561615`*^9, 3.740738685091138*^9}, 
   3.7407392212333016`*^9, 3.740741134320857*^9, 3.7407417818798823`*^9, 
   3.740801358370386*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Note", " ", "that", " ", "in", " ", "order", " ", "for", " ", "MS", " ", 
    "to", " ", "play", " ", "a", " ", "role", " ", "it", " ", "must", " ", 
    "be", " ", "that", " ", "the", " ", "actual", " ", "share", " ", "s", " ",
     "is", " ", "larger", " ", "than", " ", "the", " ", "one", " ", "would", 
    " ", "prevail", " ", "without", " ", 
    RowBox[{"MS", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{"Simplify", "[", 
       RowBox[{"q1NE", "/.", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
          RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], "]"}], "/", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Simplify", "[", 
         RowBox[{"q1NE", "/.", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
            RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], "]"}], "+", 
        RowBox[{"Simplify", "[", 
         RowBox[{"q2NE", "/.", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"p1", "\[Rule]", "p1NE"}], ",", 
            RowBox[{"p2", "\[Rule]", "p2NE"}]}], "}"}]}], "]"}]}], ")"}]}], 
     "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"sBertrand", "=", 
    RowBox[{"Limit", "[", 
     RowBox[{"%", ",", 
      RowBox[{"\[Mu]", "\[Rule]", "Infinity"}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Plot", "[", 
      RowBox[{"%", ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.739770219785677*^9, 3.739770255191895*^9}, {
  3.739770318515272*^9, 3.739770320756199*^9}, {3.740738694378815*^9, 
  3.740738841642914*^9}}],

Cell[BoxData[
 FractionBox[
  RowBox[{"2", "+", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "d"}], ")"}], " ", "\[Gamma]"}], "-", 
   SuperscriptBox["\[Gamma]", "2"], "+", 
   RowBox[{"c", " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "2"}], "+", "\[Gamma]", "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]}], 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "2"}], "+", 
     RowBox[{"2", " ", "c"}], "+", "d"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}], " ", 
   RowBox[{"(", 
    RowBox[{"2", "+", "\[Gamma]"}], ")"}]}]]], "Output",
 CellChangeTimes->{
  3.740738727616207*^9, {3.740738788610906*^9, 3.7407388427629504`*^9}, 
   3.740741134719623*^9, 3.74074178221725*^9, 3.740801358766407*^9}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 0.5, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}}, Typeset`size$$ = {540., {167., 177.}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = 
    True, $CellContext`\[Gamma]$277254$$ = 0, $CellContext`c$277255$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`\[Gamma]$$ = 0.5}, 
      "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$277254$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$277255$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[(-2 + 
          2 $CellContext`c$$ + $CellContext`d)^(-1) (-1 + $CellContext`\
\[Gamma]$$)^(-1) (2 + $CellContext`\[Gamma]$$)^(-1) (
         2 + (-1 + $CellContext`d) $CellContext`\[Gamma]$$ - $CellContext`\
\[Gamma]$$^2 + $CellContext`c$$ (-2 + $CellContext`\[Gamma]$$ + $CellContext`\
\[Gamma]$$^2)), {$CellContext`d, 0, 1}], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {$CellContext`c$$, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{612., {256., 265.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.740738727616207*^9, {3.740738788610906*^9, 3.7407388427629504`*^9}, 
   3.740741134719623*^9, 3.74074178221725*^9, 3.740801358776435*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"dsBertrand", "=", 
  RowBox[{
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"sBertrand", "\[Equal]", "s"}], ",", "d"}], "]"}], "]"}], "[", 
   RowBox[{"[", 
    RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"For", " ", "MS", " ", "to", " ", "make", " ", "sense"}], ",", 
    " ", 
    RowBox[{
    "it", " ", "must", " ", "be", " ", "that", " ", "for", " ", "given", " ", 
     "s"}], ",", " ", 
    RowBox[{
    "then", " ", "d", " ", "is", " ", "below", " ", "this", " ", "line", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"i", ".", "e", ".", " ", "firm"}], " ", "2", " ", "is", " ", 
       "not", " ", "too", " ", "inefficient"}], ")"}]}], ",", " ", 
    RowBox[{
    "otherwise", " ", "the", " ", "s", " ", "would", " ", "be", " ", 
     "useless", " ", "because", " ", "already", " ", "in", " ", "the", " ", 
     "Bertrand", " ", "equil", " ", "firm", " ", "1", " ", "obtains", " ", 
     "a", " ", "larger", " ", 
     RowBox[{"share", "."}]}]}], "*)"}]}]}], "Input",
 CellChangeTimes->{{3.739771101874544*^9, 3.7397711303522315`*^9}, {
  3.7407388763303046`*^9, 3.7407388815966215`*^9}}],

Cell[BoxData[
 RowBox[{"-", 
  FractionBox[
   RowBox[{
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", "c"}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"2", " ", "s"}]}], ")"}], " ", 
    RowBox[{"(", 
     RowBox[{
      RowBox[{"-", "2"}], "+", "\[Gamma]", "+", 
      SuperscriptBox["\[Gamma]", "2"]}], ")"}]}], 
   RowBox[{
    RowBox[{"-", "\[Gamma]"}], "+", 
    RowBox[{"s", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"-", "2"}], "+", "\[Gamma]", "+", 
       SuperscriptBox["\[Gamma]", "2"]}], ")"}]}]}]]}]], "Output",
 CellChangeTimes->{{3.739771114579318*^9, 3.739771130683112*^9}, 
   3.7397822507559505`*^9, {3.740738859807294*^9, 3.740738877230754*^9}, 
   3.7407411348878193`*^9, 3.7407417824040413`*^9, 3.740801358939869*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Nel", " ", "caso", " ", "constraine", " ", "dovviamente", " ", "la", " ", 
    "frontiera", " ", "non", " ", "cambia", " ", "ed", " ", "\[EGrave]", " ", 
    "esattamente", " ", "la", " ", "stessa", " ", "che", " ", "con", " ", 
    "Exclusivity", " ", 
    RowBox[{"poiche", "'"}], " ", "il", " ", "buyer", " ", "prende", " ", 
    "sempre", " ", "il", " ", "payoff", " ", "di", " ", "reservation", " ", 
    "che", " ", "non", " ", "dipende", " ", "da", " ", "s"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"dsBertrand", ";"}], "\[IndentingNewLine]", 
   RowBox[{"dMSConstNoConstr", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ProfitBMSConstr", "-", "ProfitBNElinear"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"ContourPlot", "[", 
        RowBox[{"%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
         RowBox[{"Contours", "\[Rule]", 
          RowBox[{"{", "0", "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"Plot", "[", 
        RowBox[{"%%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"0", ",", "1"}], "}"}]}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Red", ",", "Thick"}], "}"}]}]}], "]"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Plot", "[", 
        RowBox[{"%%%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"0", ",", "1"}], "}"}]}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Green", ",", "Thick"}], "}"}]}]}], "]"}]}], 
      "\[IndentingNewLine]", "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0.5", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.727072839688806*^9, 3.727072840234806*^9}, {
   3.727072940043606*^9, 3.727073021709606*^9}, {3.727074951278606*^9, 
   3.727074954679406*^9}, {3.7271849278954744`*^9, 3.7271849619342985`*^9}, 
   3.727267056594756*^9, {3.739766007349083*^9, 3.7397660408251095`*^9}, {
   3.7397660824769225`*^9, 3.7397660895055695`*^9}, {3.739766901580284*^9, 
   3.739766911792443*^9}, 3.7397678310428376`*^9, {3.7397698191883388`*^9, 
   3.7397698262932267`*^9}, {3.739769932947875*^9, 3.739769974876402*^9}, {
   3.7397704581656227`*^9, 3.739770470096352*^9}, {3.739775061535418*^9, 
   3.739775107593906*^9}, {3.7397752190402765`*^9, 3.739775233161841*^9}, {
   3.740738915043605*^9, 3.740738923981513*^9}, {3.740739083805358*^9, 
   3.740739167286271*^9}, {3.7407392281956873`*^9, 3.740739228937743*^9}, {
   3.7407392962380705`*^9, 3.740739297027643*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0.5, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$277348$$ = 
    0, $CellContext`c$277349$$ = 0, $CellContext`s$277350$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.5}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$277348$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$277349$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$277350$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Show[
        ContourPlot[
        Rational[-1, 2] $CellContext`k (
           2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k) + 
         Rational[-1, 
            2] (-4 + $CellContext`\[Gamma]$$^2)^(-2) (-1 + $CellContext`\
\[Gamma]$$^2)^(-1) ((-8) (-1 + $CellContext`c$$)^2 - 
           8 (-1 + $CellContext`c$$) $CellContext`d - 4 $CellContext`d^2 + 
           3 (2 (-1 + $CellContext`c$$)^2 + 
             2 (-1 + $CellContext`c$$) $CellContext`d + $CellContext`d^2) \
$CellContext`\[Gamma]$$^2 + 
           2 (-1 + $CellContext`c$$) (-1 + $CellContext`c$$ + $CellContext`d) \
$CellContext`\[Gamma]$$^3), {$CellContext`k, 0, 1.1}, {$CellContext`d, 0, 1}, 
         Contours -> {0}], 
        Plot[
        Rational[1, 8] ((-4) (-2 + 2 $CellContext`c$$ + $CellContext`k) + 
          2 (-1 + $CellContext`c$$)^2 $CellContext`s$$/(-$CellContext`k \
$CellContext`s$$ + $CellContext`k (-1 + $CellContext`s$$) $CellContext`\
\[Gamma]$$) + (-1 + $CellContext`c$$)^2 $CellContext`k^(-1) (-1 + 
            2 $CellContext`s$$) ($CellContext`s$$ + $CellContext`\[Gamma]$$ - \
$CellContext`s$$ $CellContext`\[Gamma]$$)^(-2)), {$CellContext`k, 0, 1.1}, 
         PlotRange -> {0, 1}, PlotStyle -> {Red, Thick}], 
        Plot[-(-1 + $CellContext`c$$) (-1 + 
          2 $CellContext`s$$) (-2 + $CellContext`\[Gamma]$$ + $CellContext`\
\[Gamma]$$^2)/(-$CellContext`\[Gamma]$$ + $CellContext`s$$ (-2 + \
$CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2)), {$CellContext`k, 0, 
          1.1}, PlotRange -> {0, 1}, PlotStyle -> {Green, Thick}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {$CellContext`c$$, 0, 1}, {{$CellContext`s$$, 1}, 0.5, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{
  3.7270729640208063`*^9, 3.727072995220806*^9, 3.727073042660406*^9, 
   3.7270749787970057`*^9, 3.727094445128329*^9, {3.7271849459522305`*^9, 
   3.7271849676673183`*^9}, 3.727267062385581*^9, {3.7397660036733065`*^9, 
   3.7397660418428197`*^9}, 3.7397669171958466`*^9, 3.7397678326781907`*^9, 
   3.7397698273630757`*^9, 3.7397699333920455`*^9, 3.7397699750979886`*^9, 
   3.7397704751538076`*^9, 3.739775233815573*^9, 3.7397822561453147`*^9, {
   3.740739084248004*^9, 3.7407390974075065`*^9}, {3.740739129604438*^9, 
   3.7407391677693377`*^9}, 3.7407392296893167`*^9, 3.7407392975609365`*^9, 
   3.740740299376479*^9, 3.7407411350855355`*^9, 3.740741782447055*^9, 
   3.740801359032114*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{"Now", " ", "we", " ", "move", " ", "to", " ", "the", " ", "test"}],
   "*)"}]], "Input",
 CellChangeTimes->{{3.740739324050331*^9, 3.7407393318705115`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "We", " ", "first", " ", "determine", " ", "the", " ", "p1H", " ", "that",
      " ", "is", " ", "the", " ", "price", " ", "firm", " ", "1", " ", 
     "would", " ", "offer", " ", "if", " ", "the", " ", "buyer", " ", "does", 
     " ", "not", " ", "accept", " ", 
     RowBox[{"exclusivity", ".", "\[IndentingNewLine]", "It"}], " ", "must", 
     " ", "be", " ", "that", " ", "at", " ", "this", " ", "price", " ", "the",
      " ", "capacity", " ", "constraint", " ", "is", " ", "binding", " ", 
     RowBox[{"(", 
      RowBox[{"see", " ", "later", " ", "why"}], ")"}]}], ":"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"v", "-", 
      RowBox[{"p1", " ", "q1"}], "-", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"c", "+", "d"}], ")"}], " ", "q2"}]}], "/.", 
     RowBox[{"q2", "\[Rule]", "k"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"q1constr", "=", 
    RowBox[{
     RowBox[{"FullSimplify", "[", 
      RowBox[{"Solve", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"D", "[", 
          RowBox[{"%", ",", "q1"}], "]"}], "\[Equal]", "0"}], ",", "q1"}], 
       "]"}], "]"}], "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.71973398246828*^9, 3.7197340673386803`*^9}, {
   3.7238770990970545`*^9, 3.7238771345614834`*^9}, {3.723877271441515*^9, 
   3.7238772744113846`*^9}, {3.732860201749916*^9, 3.732860240206916*^9}, 
   3.7328614088639154`*^9, {3.7397771357418966`*^9, 3.7397771384220543`*^9}, {
   3.7407393992297955`*^9, 3.7407394065095787`*^9}}],

Cell[BoxData[
 RowBox[{"1", "-", "p1", "-", 
  RowBox[{"k", " ", "\[Gamma]"}]}]], "Output",
 CellChangeTimes->{
  3.7197340675882797`*^9, 3.7238771349449406`*^9, 3.7242473092362623`*^9, 
   3.724311880454739*^9, 3.724398047590413*^9, 3.724406674973675*^9, 
   3.725864552495533*^9, 3.726206162868765*^9, 3.726227573289364*^9, 
   3.726552021111391*^9, 3.726914471293395*^9, 3.727015589559619*^9, 
   3.727075444722206*^9, 3.727155541395439*^9, 3.7271656414118395`*^9, 
   3.7272466520793104`*^9, 3.7328602154819155`*^9, 3.7328874686810503`*^9, 
   3.7344381515360823`*^9, 3.7344413547663*^9, {3.7397771326155744`*^9, 
   3.73977713908377*^9}, 3.7397822562646303`*^9, 3.740739417707508*^9, 
   3.740741135738974*^9, 3.740741782544325*^9, 3.7408013591003313`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{"The", " ", "indifference", " ", 
    RowBox[{"condition", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"FullSimplify", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"v", "-", 
        RowBox[{"p1", " ", "q1"}], "-", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"c", "+", "d"}], ")"}], " ", "q2"}]}], "/.", 
       RowBox[{"q2", "\[Rule]", "k"}]}], "/.", 
      RowBox[{"q1", "->", "q1constr"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{"ProfitBE2k", ";"}], "\[IndentingNewLine]", 
   RowBox[{"FullSimplify", "[", 
    RowBox[{"Solve", "[", 
     RowBox[{
      RowBox[{"%%", "\[Equal]", "%"}], ",", "p1"}], "]"}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"p1HTestconstr", "=", 
    RowBox[{"%", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.71973420857668*^9, 3.71973421063588*^9}, {
   3.7197343272420797`*^9, 3.71973432821128*^9}, {3.723877151665018*^9, 
   3.7238771849085875`*^9}, {3.7238772375970354`*^9, 3.723877330976375*^9}, {
   3.7328602494869156`*^9, 3.732860279694916*^9}, {3.732864526798916*^9, 
   3.7328645276119156`*^9}, {3.7397771163282533`*^9, 3.73977711934833*^9}, 
   3.740739438030176*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"1", "-", 
      RowBox[{"k", " ", "\[Gamma]"}]}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"p1", "\[Rule]", 
     RowBox[{"1", "-", 
      RowBox[{"k", " ", "\[Gamma]"}]}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.7197342112754803`*^9, 3.71973432901388*^9, {3.7238771529210863`*^9, 
   3.7238771855480027`*^9}, 3.723877242613122*^9, {3.7238773187891035`*^9, 
   3.7238773348456135`*^9}, 3.7242473093666153`*^9, 3.724311880580075*^9, 
   3.724398047668413*^9, 3.724398337124813*^9, 3.7244066752293563`*^9, 
   3.725864552573533*^9, 3.7262061640265646`*^9, 3.726227573367364*^9, 
   3.726552021189391*^9, 3.726914471387995*^9, 3.727015589726565*^9, 
   3.727075444800206*^9, 3.7271555414834394`*^9, 3.7271656414898396`*^9, 
   3.7272466522466516`*^9, {3.7328602763399158`*^9, 3.732860281398916*^9}, 
   3.732864531067916*^9, 3.73288746889437*^9, 3.7344381517376165`*^9, 
   3.7344413549056835`*^9, 3.7397771443467646`*^9, 3.739782256393943*^9, 
   3.740739442990551*^9, 3.7407411359230943`*^9, 3.740741782683194*^9, 
   3.740801359278804*^9}],

Cell[BoxData[
 RowBox[{"1", "-", 
  RowBox[{"k", " ", "\[Gamma]"}]}]], "Output",
 CellChangeTimes->{
  3.7197342112754803`*^9, 3.71973432901388*^9, {3.7238771529210863`*^9, 
   3.7238771855480027`*^9}, 3.723877242613122*^9, {3.7238773187891035`*^9, 
   3.7238773348456135`*^9}, 3.7242473093666153`*^9, 3.724311880580075*^9, 
   3.724398047668413*^9, 3.724398337124813*^9, 3.7244066752293563`*^9, 
   3.725864552573533*^9, 3.7262061640265646`*^9, 3.726227573367364*^9, 
   3.726552021189391*^9, 3.726914471387995*^9, 3.727015589726565*^9, 
   3.727075444800206*^9, 3.7271555414834394`*^9, 3.7271656414898396`*^9, 
   3.7272466522466516`*^9, {3.7328602763399158`*^9, 3.732860281398916*^9}, 
   3.732864531067916*^9, 3.73288746889437*^9, 3.7344381517376165`*^9, 
   3.7344413549056835`*^9, 3.7397771443467646`*^9, 3.739782256393943*^9, 
   3.740739442990551*^9, 3.7407411359230943`*^9, 3.740741782683194*^9, 
   3.7408013592817802`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Note", " ", "that", " ", "the", " ", "buyer", " ", "would", " ", 
     "obtain", " ", "in", " ", "exclusivity", " ", "a", " ", "payoff", " ", 
     "equal", " ", "to", " ", "that", " ", "it", " ", "would", " ", "obtain", 
     " ", "in", " ", "exclusivity", " ", "with", " ", "firm", " ", "2"}], ",",
     " ", 
    RowBox[{"q2", "=", 
     RowBox[{"k", " ", "and", " ", "same", " ", 
      RowBox[{"price", ".", " ", "Hence"}]}]}], ",", " ", 
    RowBox[{
     RowBox[{
     "the", " ", "only", " ", "way", " ", "to", " ", "make", " ", "the", " ", 
      "buyer", " ", "indifferent", " ", "is", " ", "to", " ", "set", " ", "a",
       " ", "p1", " ", "such", " ", "that", " ", "q1"}], "=", "0"}], ",", " ", 
    RowBox[{"which", " ", "is", " ", "what", " ", "p1HTest", " ", 
     RowBox[{"does", "."}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{"FullSimplify", "[", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"q1constr", "\[Equal]", "0"}], ",", "p1"}], "]"}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.723879418665333*^9, 3.723879545017068*^9}, {
  3.732860311348916*^9, 3.7328604229259157`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"p1", "\[Rule]", 
    RowBox[{"1", "-", 
     RowBox[{"k", " ", "\[Gamma]"}]}]}], "}"}], "}"}]], "Output",
 CellChangeTimes->{3.723879509495566*^9, 3.7242473094007397`*^9, 
  3.7243118806051493`*^9, 3.7243980476840134`*^9, 3.7244066753296237`*^9, 
  3.725864552635933*^9, 3.7262275733829637`*^9, 3.7265520212049913`*^9, 
  3.7269144714191947`*^9, 3.727015589757682*^9, 3.727075444815806*^9, 
  3.7271555415094395`*^9, 3.727165641521039*^9, 3.727246652349928*^9, 
  3.732860413223916*^9, 3.732887475161928*^9, 3.734438151844902*^9, 
  3.734441354949794*^9, 3.7397771665548267`*^9, 3.7397822564240355`*^9, 
  3.7407394575300627`*^9, 3.7407411361418557`*^9, 3.7407417827182927`*^9, 
  3.740801359345948*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
   "Now", " ", "the", " ", "boundary", " ", "of", " ", "the", " ", "test", 
    " ", "when", " ", "the", " ", "constrained", " ", "price", " ", 
    RowBox[{"prevails", ":"}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"q1NE", "*", "p1"}], "/.", "pMSConstr"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{"k", "-", "q2"}], ")"}], " ", "c"}], "+", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"q1", "-", 
           RowBox[{"(", 
            RowBox[{"k", "-", "q2"}], ")"}]}], ")"}], "p1h"}]}], "/.", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
         RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", "pMSConstr"}], "/.", 
     RowBox[{"p1h", "\[Rule]", "p1HTestconstr"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"ContourPlot", "[", 
      RowBox[{
       RowBox[{"%%", "-", "%"}], ",", 
       RowBox[{"{", 
        RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
       RowBox[{"Contours", "\[Rule]", 
        RowBox[{"{", "0", "}"}]}]}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.4"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7270953298405285`*^9, 3.727095451418729*^9}, {
   3.739777199620761*^9, 3.7397772020863175`*^9}, 3.7397772566524525`*^9, {
   3.740739504949519*^9, 3.740739515065344*^9}, {3.740739548858359*^9, 
   3.740739599272942*^9}, {3.7407396600433283`*^9, 3.740739672163005*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.4, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Gamma]$$], 0.4}, 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`c$277788$$ = 
    0, $CellContext`\[Gamma]$277789$$ = 0, $CellContext`s$277790$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.4}, "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$277788$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$277789$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$277790$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      ContourPlot[(-1 + $CellContext`\[Gamma]$$^2)^(-1) (
          1 - (1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
             2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k)/(-1 + 
            2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
           Rational[
            1, 2] $CellContext`\[Gamma]$$ + $CellContext`s$$ ($CellContext`k (
              2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
             2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
            Rational[
             1, 2] (-1 + $CellContext`\[Gamma]$$^2)) ($CellContext`\[Gamma]$$ - \
(1 - (1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) ($CellContext`k (
              2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
             2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^Rational[1, 2]) $CellContext`\[Gamma]$$ - (
           1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
             2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k)/(-1 + 
            2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
           Rational[
            1, 2] $CellContext`\[Gamma]$$ + $CellContext`s$$ ($CellContext`k (
              2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
             2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
            Rational[
             1, 2] (-1 + $CellContext`\[Gamma]$$^2)) - ($CellContext`c$$ \
($CellContext`k - (-1 + $CellContext`\[Gamma]$$^2)^(-1) (-(
             1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
               2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
              2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
             Rational[
              1, 2] + $CellContext`\[Gamma]$$ - $CellContext`\[Gamma]$$ (
            1 - (1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
               2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
              2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
             Rational[
              1, 2] $CellContext`\[Gamma]$$ + $CellContext`s$$ \
($CellContext`k (
                2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
               2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^Rational[1, 2] (-1 + $CellContext`\[Gamma]$$^2)))) + (
          1 - $CellContext`k $CellContext`\[Gamma]$$) (-$CellContext`k + (-1 + \
$CellContext`\[Gamma]$$^2)^(-1) ($CellContext`\[Gamma]$$ - (
             1 - (1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
                2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
               2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^Rational[1, 2]) $CellContext`\[Gamma]$$ - (
             1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
               2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
              2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
             Rational[
              1, 2] $CellContext`\[Gamma]$$ + $CellContext`s$$ \
($CellContext`k (
                2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
               2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
              Rational[
               1, 2] (-1 + $CellContext`\[Gamma]$$^2)) + (-1 + $CellContext`\
\[Gamma]$$^2)^(-1) (-(
              1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
                2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
               2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
              Rational[
               1, 2] + $CellContext`\[Gamma]$$ - $CellContext`\[Gamma]$$ (
             1 - (1 + $CellContext`s$$ (-1 + $CellContext`\[Gamma]$$)) \
($CellContext`k (
                2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
               2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + $CellContext`\
\[Gamma]$$)))^
              Rational[
               1, 2] $CellContext`\[Gamma]$$ + $CellContext`s$$ \
($CellContext`k (
                 2 (-1 + $CellContext`c$$ + $CellContext`d) + \
$CellContext`k)/(-1 + 
                2 (-1 + $CellContext`s$$) $CellContext`s$$ (-1 + \
$CellContext`\[Gamma]$$)))^
               Rational[
                1, 2] (-1 + $CellContext`\[Gamma]$$^2))))), {$CellContext`k, 
         0, 1.1}, {$CellContext`d, 0, 1}, Contours -> {0}], 
      "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Gamma]$$, 0.4}, 0, 1}, {{$CellContext`s$$, 1}, 
         0, 1}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.727095441762329*^9, 3.727095451605929*^9}, 
   3.7272686710447674`*^9, 3.739777273714806*^9, 3.740739517297533*^9, {
   3.7407395842718863`*^9, 3.7407395997391224`*^9}, 3.7407396818882475`*^9, 
   3.7407403174780035`*^9, 3.7407411363832364`*^9, 3.7407417827729654`*^9, 
   3.7408013594091177`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   RowBox[{"q1NE", "*", "p1"}], "/.", "pMSConstr"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"FullSimplify", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"(", 
        RowBox[{"k", "-", "q2"}], ")"}], " ", "c"}], "+", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"q1", "-", 
         RowBox[{"(", 
          RowBox[{"k", "-", "q2"}], ")"}]}], ")"}], "p1h"}]}], "/.", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"q1", "\[Rule]", "q1NE"}], ",", 
       RowBox[{"q2", "\[Rule]", "q2NE"}]}], "}"}]}], "/.", "pMSConstr"}], "/.", 
   RowBox[{"p1h", "\[Rule]", "p1HTestconstr"}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"tmpMSTest", "=", 
   RowBox[{"Solve", "[", 
    RowBox[{
     RowBox[{"%", "\[Equal]", "%%"}], ",", "d"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.74073969698925*^9, 3.740739728609521*^9}, {
  3.7407403396044397`*^9, 3.740740356287275*^9}}],

Cell[BoxData[
 RowBox[{"s", " ", 
  RowBox[{"(", 
   RowBox[{"1", "+", 
    RowBox[{
     SqrtBox[
      FractionBox[
       RowBox[{"k", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"2", " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
         ")"}]}], 
       RowBox[{
        RowBox[{"-", "1"}], "+", 
        RowBox[{"2", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]], " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"s", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}], "-", "\[Gamma]"}], 
      ")"}]}]}], ")"}], " ", 
  SqrtBox[
   FractionBox[
    RowBox[{"k", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"2", " ", 
        RowBox[{"(", 
         RowBox[{
          RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
      ")"}]}], 
    RowBox[{
     RowBox[{"-", "1"}], "+", 
     RowBox[{"2", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}]], "Output",
 CellChangeTimes->{{3.7407397161047306`*^9, 3.7407397319581985`*^9}, {
   3.740740328426363*^9, 3.7407403568179555`*^9}, 3.740741136987166*^9, 
   3.740741783567404*^9, 3.7408013603004866`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"(", 
    RowBox[{"1", "+", 
     RowBox[{"c", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"-", "1"}], "+", "s"}], ")"}]}]}], ")"}], " ", 
   SqrtBox[
    FractionBox[
     RowBox[{"k", " ", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"2", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
       ")"}]}], 
     RowBox[{
      RowBox[{"-", "1"}], "+", 
      RowBox[{"2", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]]}], "+", 
  RowBox[{
   SuperscriptBox["k", "2"], " ", "\[Gamma]"}], "+", 
  RowBox[{"k", " ", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{"-", "1"}], "+", "c", "-", 
     RowBox[{
      SqrtBox[
       FractionBox[
        RowBox[{"k", " ", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{"2", " ", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{"-", "1"}], "+", "c", "+", "d"}], ")"}]}], "+", "k"}], 
          ")"}]}], 
        RowBox[{
         RowBox[{"-", "1"}], "+", 
         RowBox[{"2", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "s"}], ")"}], " ", "s", " ", 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"-", "1"}], "+", "\[Gamma]"}], ")"}]}]}]]], " ", 
      "\[Gamma]"}]}], ")"}]}]}]], "Output",
 CellChangeTimes->{{3.7407397161047306`*^9, 3.7407397319581985`*^9}, {
   3.740740328426363*^9, 3.7407403568179555`*^9}, 3.740741136987166*^9, 
   3.740741783567404*^9, 3.740801361092594*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"{", 
   RowBox[{
    RowBox[{"tmpMSTest", "[", 
     RowBox[{"[", 
      RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
    RowBox[{"tmpMSTest", "[", 
     RowBox[{"[", 
      RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], "}"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"Plot", "[", 
    RowBox[{"%", ",", 
     RowBox[{"{", 
      RowBox[{"k", ",", "0", ",", "1"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
   ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"s", ",", "1"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"d", ",", "0", ",", "1"}], "}"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.7407403782013445`*^9, 3.740740445975334*^9}, {
  3.7407405158362885`*^9, 3.740740528960836*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`d$$ = 
    0, $CellContext`s$$ = 1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = 
    True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0, 1}, {
      Hold[$CellContext`d$$], 0, 1}}, Typeset`size$$ = {540., {166., 176.}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = 
    True, $CellContext`c$278739$$ = 0, $CellContext`\[Gamma]$278740$$ = 
    0, $CellContext`s$278741$$ = 0, $CellContext`d$278742$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`d$$ = 
        0, $CellContext`s$$ = 1, $CellContext`\[Gamma]$$ = 0.5}, 
      "ControllerVariables" :> {
        Hold[$CellContext`c$$, $CellContext`c$278739$$, 0], 
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$278740$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$278741$$, 0], 
        Hold[$CellContext`d$$, $CellContext`d$278742$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[{Rational[
          1, 2] (4 $CellContext`k $CellContext`s$$^4 + 
           8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
           8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
           4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
           8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
           4 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2)^(-1) (-2 + 4 $CellContext`c$$ - 
          2 $CellContext`c$$^2 + 8 $CellContext`s$$ - 
          16 $CellContext`c$$ $CellContext`s$$ + 
          8 $CellContext`c$$^2 $CellContext`s$$ - 14 $CellContext`s$$^2 + 
          28 $CellContext`c$$ $CellContext`s$$^2 - 
          14 $CellContext`c$$^2 $CellContext`s$$^2 - 
          4 $CellContext`k $CellContext`s$$^2 + 
          4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
          12 $CellContext`s$$^3 - 24 $CellContext`c$$ $CellContext`s$$^3 + 
          12 $CellContext`c$$^2 $CellContext`s$$^3 + 
          8 $CellContext`k $CellContext`s$$^3 - 
          8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
          4 $CellContext`s$$^4 + 8 $CellContext`c$$ $CellContext`s$$^4 - 
          4 $CellContext`c$$^2 $CellContext`s$$^4 - 
          4 $CellContext`k^2 $CellContext`s$$^4 + 
          4 $CellContext`k $CellContext`\[Gamma]$$ - 
          4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ - 
          4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
          8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
          4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
          16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
          16 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
          24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
          12 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
          28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
          28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 $CellContext`\
\[Gamma]$$ + 4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
          12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
          24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
          12 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
          16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
          16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 $CellContext`\
\[Gamma]$$ - 16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
          4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
          8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
          4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
          16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
          2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
          8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
          8 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$^2 + 8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
          16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
          16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 $CellContext`\
\[Gamma]$$^2 - 
          20 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
          8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
          8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 $CellContext`\
\[Gamma]$$^2 + 
          32 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
          20 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
          4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
          12 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
          16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 + 
          8 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 - ((
             2 - 4 $CellContext`c$$ + 2 $CellContext`c$$^2 - 
             8 $CellContext`s$$ + 16 $CellContext`c$$ $CellContext`s$$ - 
             8 $CellContext`c$$^2 $CellContext`s$$ + 14 $CellContext`s$$^2 - 
             28 $CellContext`c$$ $CellContext`s$$^2 + 
             14 $CellContext`c$$^2 $CellContext`s$$^2 + 
             4 $CellContext`k $CellContext`s$$^2 - 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 - 
             12 $CellContext`s$$^3 + 24 $CellContext`c$$ $CellContext`s$$^3 - 
             12 $CellContext`c$$^2 $CellContext`s$$^3 - 
             8 $CellContext`k $CellContext`s$$^3 + 
             8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 + 
             4 $CellContext`s$$^4 - 8 $CellContext`c$$ $CellContext`s$$^4 + 
             4 $CellContext`c$$^2 $CellContext`s$$^4 + 
             4 $CellContext`k^2 $CellContext`s$$^4 - 
             4 $CellContext`k $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
             4 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
             16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$^2 - 8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
             16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
             20 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
             32 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             20 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 + 
             4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 - 
             12 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 + 
             16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 - 
             8 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^3)^2 - 
           4 (4 $CellContext`k $CellContext`s$$^4 + 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
            8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
            4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
            4 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$^2) \
(-2 + 6 $CellContext`c$$ - 6 $CellContext`c$$^2 + 2 $CellContext`c$$^3 + 
            2 $CellContext`k - 4 $CellContext`c$$ $CellContext`k + 
            2 $CellContext`c$$^2 $CellContext`k + 8 $CellContext`s$$ - 
            24 $CellContext`c$$ $CellContext`s$$ + 
            24 $CellContext`c$$^2 $CellContext`s$$ - 
            8 $CellContext`c$$^3 $CellContext`s$$ - 
            8 $CellContext`k $CellContext`s$$ + 
            16 $CellContext`c$$ $CellContext`k $CellContext`s$$ - 
            8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ - 
            14 $CellContext`s$$^2 + 42 $CellContext`c$$ $CellContext`s$$^2 - 
            42 $CellContext`c$$^2 $CellContext`s$$^2 + 
            14 $CellContext`c$$^3 $CellContext`s$$^2 + 
            11 $CellContext`k $CellContext`s$$^2 - 
            22 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
            11 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 + 
            2 $CellContext`k^2 $CellContext`s$$^2 - 
            2 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 + 
            12 $CellContext`s$$^3 - 36 $CellContext`c$$ $CellContext`s$$^3 + 
            36 $CellContext`c$$^2 $CellContext`s$$^3 - 
            12 $CellContext`c$$^3 $CellContext`s$$^3 - 
            6 $CellContext`k $CellContext`s$$^3 + 
            12 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
            6 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 - 
            4 $CellContext`k^2 $CellContext`s$$^3 + 
            4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 - 
            4 $CellContext`s$$^4 + 12 $CellContext`c$$ $CellContext`s$$^4 - 
            12 $CellContext`c$$^2 $CellContext`s$$^4 + 
            4 $CellContext`c$$^3 $CellContext`s$$^4 + 
            2 $CellContext`k $CellContext`s$$^4 - 
            4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 + 
            2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 + \
$CellContext`k^3 $CellContext`s$$^4 + 
            4 $CellContext`k $CellContext`\[Gamma]$$ - 
            8 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
            4 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
            4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
            4 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
            4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
            12 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
            12 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
            4 $CellContext`c$$^3 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
            10 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
            20 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$ - 
            10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 
            16 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
            16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
            36 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
            36 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
            12 $CellContext`c$$^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
            10 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
            
            20 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
            10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
            26 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
            26 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
            2 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
            12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
            36 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
            36 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
            12 $CellContext`c$$^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
            2 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
            4 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
            2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
            16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
            16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
            6 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
            4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
            12 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
            12 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
            4 $CellContext`c$$^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
            2 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
            4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
            2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
            6 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
            2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
            2 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
            2 $CellContext`k^3 $CellContext`\[Gamma]$$^2 + 
            8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
            16 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$^2 + 
            8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
            4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
            4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
            8 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
            16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
            32 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
            16 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
            16 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
            16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
            17 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
            16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
            8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
            12 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
            12 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
            22 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
            13 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
            4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
            4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^3 + 
            6 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
            4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
            4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 - 
            18 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 + 
            24 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 - 
            12 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 + 
            4 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^4 - 
            8 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^4 + 
            4 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^4))^
          Rational[1, 2]), 
         Rational[
          1, 2] (4 $CellContext`k $CellContext`s$$^4 + 
           8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
           8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
           4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
           8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
           4 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2)^(-1) (-2 + 4 $CellContext`c$$ - 
          2 $CellContext`c$$^2 + 8 $CellContext`s$$ - 
          16 $CellContext`c$$ $CellContext`s$$ + 
          8 $CellContext`c$$^2 $CellContext`s$$ - 14 $CellContext`s$$^2 + 
          28 $CellContext`c$$ $CellContext`s$$^2 - 
          14 $CellContext`c$$^2 $CellContext`s$$^2 - 
          4 $CellContext`k $CellContext`s$$^2 + 
          4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
          12 $CellContext`s$$^3 - 24 $CellContext`c$$ $CellContext`s$$^3 + 
          12 $CellContext`c$$^2 $CellContext`s$$^3 + 
          8 $CellContext`k $CellContext`s$$^3 - 
          8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
          4 $CellContext`s$$^4 + 8 $CellContext`c$$ $CellContext`s$$^4 - 
          4 $CellContext`c$$^2 $CellContext`s$$^4 - 
          4 $CellContext`k^2 $CellContext`s$$^4 + 
          4 $CellContext`k $CellContext`\[Gamma]$$ - 
          4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ - 
          4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
          8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
          4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
          16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
          16 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
          24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
          12 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
          28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
          
          28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 $CellContext`\
\[Gamma]$$ + 4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
          12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
          24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
          12 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
          16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
          16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 $CellContext`\
\[Gamma]$$ - 16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
          4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
          8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
          4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
          16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
          2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
          8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
          8 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$^2 + 8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
          16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
          16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 $CellContext`\
\[Gamma]$$^2 - 
          20 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
          8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
          8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 $CellContext`\
\[Gamma]$$^2 + 
          32 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
          20 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
          4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
          12 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
          16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 + 
          8 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 + ((
              2 - 4 $CellContext`c$$ + 2 $CellContext`c$$^2 - 
              8 $CellContext`s$$ + 16 $CellContext`c$$ $CellContext`s$$ - 
              8 $CellContext`c$$^2 $CellContext`s$$ + 14 $CellContext`s$$^2 - 
              28 $CellContext`c$$ $CellContext`s$$^2 + 
              14 $CellContext`c$$^2 $CellContext`s$$^2 + 
              4 $CellContext`k $CellContext`s$$^2 - 
              4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 - 
              12 $CellContext`s$$^3 + 24 $CellContext`c$$ $CellContext`s$$^3 - 
              12 $CellContext`c$$^2 $CellContext`s$$^3 - 
              8 $CellContext`k $CellContext`s$$^3 + 
              8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 + 
              4 $CellContext`s$$^4 - 8 $CellContext`c$$ $CellContext`s$$^4 + 
              4 $CellContext`c$$^2 $CellContext`s$$^4 + 
              4 $CellContext`k^2 $CellContext`s$$^4 - 
              4 $CellContext`k $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
              4 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
              12 $CellContext`c$$^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
              12 $CellContext`c$$^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
              16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
              20 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
              32 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
              20 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2 + 
              4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 - 
              12 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 + 
              16 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^3 - 
              8 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^3)^2 - 
            4 (4 $CellContext`k $CellContext`s$$^4 + 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             4 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$^2) \
(-2 + 6 $CellContext`c$$ - 6 $CellContext`c$$^2 + 2 $CellContext`c$$^3 + 
             2 $CellContext`k - 4 $CellContext`c$$ $CellContext`k + 
             2 $CellContext`c$$^2 $CellContext`k + 8 $CellContext`s$$ - 
             24 $CellContext`c$$ $CellContext`s$$ + 
             24 $CellContext`c$$^2 $CellContext`s$$ - 
             8 $CellContext`c$$^3 $CellContext`s$$ - 
             8 $CellContext`k $CellContext`s$$ + 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$ - 
             8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ - 
             14 $CellContext`s$$^2 + 42 $CellContext`c$$ $CellContext`s$$^2 - 
             42 $CellContext`c$$^2 $CellContext`s$$^2 + 
             14 $CellContext`c$$^3 $CellContext`s$$^2 + 
             11 $CellContext`k $CellContext`s$$^2 - 
             22 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
             11 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 + 
             2 $CellContext`k^2 $CellContext`s$$^2 - 
             2 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 + 
             12 $CellContext`s$$^3 - 36 $CellContext`c$$ $CellContext`s$$^3 + 
             36 $CellContext`c$$^2 $CellContext`s$$^3 - 
             12 $CellContext`c$$^3 $CellContext`s$$^3 - 
             6 $CellContext`k $CellContext`s$$^3 + 
             12 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
             6 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 - 
             4 $CellContext`k^2 $CellContext`s$$^3 + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 - 
             4 $CellContext`s$$^4 + 12 $CellContext`c$$ $CellContext`s$$^4 - 
             12 $CellContext`c$$^2 $CellContext`s$$^4 + 
             4 $CellContext`c$$^3 $CellContext`s$$^4 + 
             2 $CellContext`k $CellContext`s$$^4 - 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 + 
             2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 + \
$CellContext`k^3 $CellContext`s$$^4 + 
             4 $CellContext`k $CellContext`\[Gamma]$$ - 
             8 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$^3 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             10 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             20 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 
             10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 
             16 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             36 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             36 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             10 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             20 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
             10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
             26 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             26 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
             2 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             36 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             36 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
             2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
             16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
             6 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
             2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
             6 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             2 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             2 $CellContext`k^3 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
             8 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
             32 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
             16 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
             17 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
             12 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             12 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
             22 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             13 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^3 + 
             6 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
             4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 - 
             18 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 + 
             24 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 - 
             12 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 + 
             4 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^4 - 
             8 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^4 + 
             4 $CellContext`k^3 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^4))^Rational[1, 2])}, {$CellContext`k, 0, 1}], 
      "Specifications" :> {{$CellContext`c$$, 0, 
         1}, {{$CellContext`\[Gamma]$$, 0.5}, 0, 1}, {{$CellContext`s$$, 1}, 
         0, 1}, {$CellContext`d$$, 0, 1}}, "Options" :> {}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{612., {297., 306.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.7407404126035147`*^9, 3.740740415073314*^9}, 
   3.7407404467572536`*^9, 3.7407405298389015`*^9, 3.740741137700878*^9, 
   3.740741786734331*^9, 3.7408013648866835`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "This", " ", "shows", " ", "as", " ", "explained", " ", "in", " ", "the", 
   " ", "text", " ", "that", " ", "the", " ", "Test", " ", "becomes", " ", 
   "more", " ", "difficult", " ", "to", " ", "satisfy", " ", "for", " ", 
   "larger", " ", 
   RowBox[{"s", "."}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.7407407185523157`*^9, 3.740740737579141*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
    "Recalling", " ", "that", " ", "when", " ", "the", " ", "price", " ", 
     "is", " ", "unconstrained", " ", "then", " ", "MS", " ", "is", " ", 
     "always", " ", "anticompetitive"}], ",", " ", 
    RowBox[{
    "we", " ", "now", " ", "have", " ", "the", " ", "whole", " ", "picture", 
     " ", "of", " ", "the", " ", 
     RowBox[{"effects", ":"}]}]}], "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"tmpMSTest", "[", 
       RowBox[{"[", 
        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ",", 
      RowBox[{"tmpMSTest", "[", 
       RowBox[{"[", 
        RowBox[{"2", ",", "1", ",", "2"}], "]"}], "]"}]}], "}"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"dsBertrand", ";"}], "\[IndentingNewLine]", 
   RowBox[{"dMSConstNoConstr", ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ProfitBMSConstr", "-", "ProfitBNElinear"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Manipulate", "[", 
    RowBox[{
     RowBox[{"Show", "[", 
      RowBox[{
       RowBox[{"ContourPlot", "[", 
        RowBox[{"%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"d", ",", "0", ",", "1"}], "}"}], ",", 
         RowBox[{"Contours", "\[Rule]", 
          RowBox[{"{", "0", "}"}]}]}], "]"}], ",", "\[IndentingNewLine]", 
       RowBox[{"Plot", "[", 
        RowBox[{"%%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"0", ",", "1"}], "}"}]}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Red", ",", "Thick"}], "}"}]}]}], "]"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Plot", "[", 
        RowBox[{"%%%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"0", ",", "1"}], "}"}]}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Green", ",", "Thick"}], "}"}]}]}], "]"}], ",", 
       "\[IndentingNewLine]", 
       RowBox[{"Plot", "[", 
        RowBox[{"%%%%", ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "0", ",", "1.1"}], "}"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"0", ",", "1"}], "}"}]}], ",", 
         RowBox[{"PlotStyle", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{"Magenta", ",", "Thick"}], "}"}]}]}], "]"}]}], 
      "\[IndentingNewLine]", "]"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"\[Gamma]", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], 
     ",", 
     RowBox[{"{", 
      RowBox[{"c", ",", "0", ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"s", ",", "1"}], "}"}], ",", "0.5", ",", "1"}], "}"}]}], 
    "]"}]}]}]], "Input",
 CellChangeTimes->{{3.7407406622947545`*^9, 3.7407406840854807`*^9}, {
  3.740740751369849*^9, 3.740740781379652*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`c$$ = 0, $CellContext`s$$ = 
    1, $CellContext`\[Gamma]$$ = 0.5, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`\[Gamma]$$], 0.5}, 0, 1}, {
      Hold[$CellContext`c$$], 0, 1}, {{
       Hold[$CellContext`s$$], 1}, 0.5, 1}}, Typeset`size$$ = {
    540., {265., 274.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`\[Gamma]$278765$$ = 
    0, $CellContext`c$278766$$ = 0, $CellContext`s$278767$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`c$$ = 0, $CellContext`s$$ = 
        1, $CellContext`\[Gamma]$$ = 0.5}, "ControllerVariables" :> {
        Hold[$CellContext`\[Gamma]$$, $CellContext`\[Gamma]$278765$$, 0], 
        Hold[$CellContext`c$$, $CellContext`c$278766$$, 0], 
        Hold[$CellContext`s$$, $CellContext`s$278767$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Show[
        ContourPlot[
        Rational[-1, 2] $CellContext`k (
           2 (-1 + $CellContext`c$$ + $CellContext`d) + $CellContext`k) + 
         Rational[-1, 
            2] (-4 + $CellContext`\[Gamma]$$^2)^(-2) (-1 + $CellContext`\
\[Gamma]$$^2)^(-1) ((-8) (-1 + $CellContext`c$$)^2 - 
           8 (-1 + $CellContext`c$$) $CellContext`d - 4 $CellContext`d^2 + 
           3 (2 (-1 + $CellContext`c$$)^2 + 
             2 (-1 + $CellContext`c$$) $CellContext`d + $CellContext`d^2) \
$CellContext`\[Gamma]$$^2 + 
           2 (-1 + $CellContext`c$$) (-1 + $CellContext`c$$ + $CellContext`d) \
$CellContext`\[Gamma]$$^3), {$CellContext`k, 0, 1.1}, {$CellContext`d, 0, 1}, 
         Contours -> {0}], 
        Plot[
        Rational[1, 8] ((-4) (-2 + 2 $CellContext`c$$ + $CellContext`k) + 
          2 (-1 + $CellContext`c$$)^2 $CellContext`s$$/(-$CellContext`k \
$CellContext`s$$ + $CellContext`k (-1 + $CellContext`s$$) $CellContext`\
\[Gamma]$$) + (-1 + $CellContext`c$$)^2 $CellContext`k^(-1) (-1 + 
            2 $CellContext`s$$) ($CellContext`s$$ + $CellContext`\[Gamma]$$ - \
$CellContext`s$$ $CellContext`\[Gamma]$$)^(-2)), {$CellContext`k, 0, 1.1}, 
         PlotRange -> {0, 1}, PlotStyle -> {Red, Thick}], 
        Plot[-(-1 + $CellContext`c$$) (-1 + 
          2 $CellContext`s$$) (-2 + $CellContext`\[Gamma]$$ + $CellContext`\
\[Gamma]$$^2)/(-$CellContext`\[Gamma]$$ + $CellContext`s$$ (-2 + \
$CellContext`\[Gamma]$$ + $CellContext`\[Gamma]$$^2)), {$CellContext`k, 0, 
          1.1}, PlotRange -> {0, 1}, PlotStyle -> {Green, Thick}], 
        Plot[{
         Rational[
           1, 2] (4 $CellContext`k $CellContext`s$$^4 + 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
            8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
            4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
            4 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2)^(-1) (-2 + 4 $CellContext`c$$ - 
           2 $CellContext`c$$^2 + 8 $CellContext`s$$ - 
           16 $CellContext`c$$ $CellContext`s$$ + 
           8 $CellContext`c$$^2 $CellContext`s$$ - 14 $CellContext`s$$^2 + 
           28 $CellContext`c$$ $CellContext`s$$^2 - 
           14 $CellContext`c$$^2 $CellContext`s$$^2 - 
           4 $CellContext`k $CellContext`s$$^2 + 
           4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
           12 $CellContext`s$$^3 - 24 $CellContext`c$$ $CellContext`s$$^3 + 
           12 $CellContext`c$$^2 $CellContext`s$$^3 + 
           8 $CellContext`k $CellContext`s$$^3 - 
           8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
           4 $CellContext`s$$^4 + 8 $CellContext`c$$ $CellContext`s$$^4 - 
           4 $CellContext`c$$^2 $CellContext`s$$^4 - 
           4 $CellContext`k^2 $CellContext`s$$^4 + 
           4 $CellContext`k $CellContext`\[Gamma]$$ - 
           4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ - 
           4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
           8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
           4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
           16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
           16 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
           24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
           12 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
           28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
           28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
           4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
           12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
           24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
           12 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
           16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
           16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
           16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
           4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
           8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
           4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
           16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
           2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
           8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
           8 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$^2 + 8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
           16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
           16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
           20 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
           8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
           8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 $CellContext`\
\[Gamma]$$^2 + 
           32 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
           20 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
           4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
           12 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
           16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 + 
           8 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 - \
((2 - 4 $CellContext`c$$ + 2 $CellContext`c$$^2 - 8 $CellContext`s$$ + 
              16 $CellContext`c$$ $CellContext`s$$ - 
              8 $CellContext`c$$^2 $CellContext`s$$ + 14 $CellContext`s$$^2 - 
              28 $CellContext`c$$ $CellContext`s$$^2 + 
              14 $CellContext`c$$^2 $CellContext`s$$^2 + 
              4 $CellContext`k $CellContext`s$$^2 - 
              4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 - 
              12 $CellContext`s$$^3 + 24 $CellContext`c$$ $CellContext`s$$^3 - 
              12 $CellContext`c$$^2 $CellContext`s$$^3 - 
              8 $CellContext`k $CellContext`s$$^3 + 
              8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 + 
              4 $CellContext`s$$^4 - 8 $CellContext`c$$ $CellContext`s$$^4 + 
              4 $CellContext`c$$^2 $CellContext`s$$^4 + 
              4 $CellContext`k^2 $CellContext`s$$^4 - 
              4 $CellContext`k $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
              4 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
              12 $CellContext`c$$^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              
              28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
              12 $CellContext`c$$^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
              16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
              20 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
              32 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
              20 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2 + 
              4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 - 
              12 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 + 
              16 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^3 - 
              8 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^3)^2 - 
            4 (4 $CellContext`k $CellContext`s$$^4 + 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             4 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$^2) \
(-2 + 6 $CellContext`c$$ - 6 $CellContext`c$$^2 + 2 $CellContext`c$$^3 + 
             2 $CellContext`k - 4 $CellContext`c$$ $CellContext`k + 
             2 $CellContext`c$$^2 $CellContext`k + 8 $CellContext`s$$ - 
             24 $CellContext`c$$ $CellContext`s$$ + 
             24 $CellContext`c$$^2 $CellContext`s$$ - 
             8 $CellContext`c$$^3 $CellContext`s$$ - 
             8 $CellContext`k $CellContext`s$$ + 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$ - 
             8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ - 
             14 $CellContext`s$$^2 + 42 $CellContext`c$$ $CellContext`s$$^2 - 
             42 $CellContext`c$$^2 $CellContext`s$$^2 + 
             14 $CellContext`c$$^3 $CellContext`s$$^2 + 
             11 $CellContext`k $CellContext`s$$^2 - 
             22 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
             11 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 + 
             2 $CellContext`k^2 $CellContext`s$$^2 - 
             2 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 + 
             12 $CellContext`s$$^3 - 36 $CellContext`c$$ $CellContext`s$$^3 + 
             36 $CellContext`c$$^2 $CellContext`s$$^3 - 
             12 $CellContext`c$$^3 $CellContext`s$$^3 - 
             6 $CellContext`k $CellContext`s$$^3 + 
             12 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
             6 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 - 
             4 $CellContext`k^2 $CellContext`s$$^3 + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 - 
             4 $CellContext`s$$^4 + 12 $CellContext`c$$ $CellContext`s$$^4 - 
             12 $CellContext`c$$^2 $CellContext`s$$^4 + 
             4 $CellContext`c$$^3 $CellContext`s$$^4 + 
             2 $CellContext`k $CellContext`s$$^4 - 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 + 
             2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 + \
$CellContext`k^3 $CellContext`s$$^4 + 
             4 $CellContext`k $CellContext`\[Gamma]$$ - 
             8 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
             4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
             4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$^3 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             10 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
             20 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 
             10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 
             16 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
             16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             36 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             36 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             10 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             20 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
             10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
             26 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
             26 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
             2 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
             12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             36 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             36 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
             2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
             16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
             16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
             6 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
             4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             12 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             12 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             4 $CellContext`c$$^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
             4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
             2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
             6 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
             2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             2 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
             2 $CellContext`k^3 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
             8 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
             32 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
             16 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
             17 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
             8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
             16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
             8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
             12 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             12 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
             22 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
             13 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
             4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^3 + 
             6 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
             4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
             4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 - 
             18 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 + 
             24 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 - 
             12 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 + 
             4 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^4 - 
             8 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^4 + 
             4 $CellContext`k^3 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^4))^Rational[1, 2]), 
          Rational[
           1, 2] (4 $CellContext`k $CellContext`s$$^4 + 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
            8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
            4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
            8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
            4 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2)^(-1) (-2 + 4 $CellContext`c$$ - 
           2 $CellContext`c$$^2 + 8 $CellContext`s$$ - 
           16 $CellContext`c$$ $CellContext`s$$ + 
           8 $CellContext`c$$^2 $CellContext`s$$ - 14 $CellContext`s$$^2 + 
           28 $CellContext`c$$ $CellContext`s$$^2 - 
           14 $CellContext`c$$^2 $CellContext`s$$^2 - 
           4 $CellContext`k $CellContext`s$$^2 + 
           4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
           12 $CellContext`s$$^3 - 24 $CellContext`c$$ $CellContext`s$$^3 + 
           12 $CellContext`c$$^2 $CellContext`s$$^3 + 
           8 $CellContext`k $CellContext`s$$^3 - 
           8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
           4 $CellContext`s$$^4 + 8 $CellContext`c$$ $CellContext`s$$^4 - 
           4 $CellContext`c$$^2 $CellContext`s$$^4 - 
           4 $CellContext`k^2 $CellContext`s$$^4 + 
           4 $CellContext`k $CellContext`\[Gamma]$$ - 
           4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ - 
           4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
           8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
           4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
           16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
           16 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
           24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
           12 $CellContext`c$$^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
           28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
           28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
           4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
           12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
           24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
           12 $CellContext`c$$^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
           16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
           16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
           16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
           4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
           8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
           4 $CellContext`c$$^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
           16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 2 
           $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
           8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
           8 $CellContext`c$$ $CellContext`k $CellContext`s$$ $CellContext`\
\[Gamma]$$^2 + 8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
           16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
           16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
           20 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
           8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
           8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 $CellContext`\
\[Gamma]$$^2 + 
           32 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
           20 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^2 - 
           4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
           12 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
           16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$^3 + 
           8 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$^3 + \
((2 - 4 $CellContext`c$$ + 2 $CellContext`c$$^2 - 8 $CellContext`s$$ + 
               16 $CellContext`c$$ $CellContext`s$$ - 
               8 $CellContext`c$$^2 $CellContext`s$$ + 14 $CellContext`s$$^2 - 
               28 $CellContext`c$$ $CellContext`s$$^2 + 
               14 $CellContext`c$$^2 $CellContext`s$$^2 + 
               4 $CellContext`k $CellContext`s$$^2 - 
               4 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 - 
               12 $CellContext`s$$^3 + 24 $CellContext`c$$ $CellContext`s$$^3 - 
               12 $CellContext`c$$^2 $CellContext`s$$^3 - 
               8 $CellContext`k $CellContext`s$$^3 + 
               8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 + 
               4 $CellContext`s$$^4 - 8 $CellContext`c$$ $CellContext`s$$^4 + 
               4 $CellContext`c$$^2 $CellContext`s$$^4 + 
               4 $CellContext`k^2 $CellContext`s$$^4 - 
               4 $CellContext`k $CellContext`\[Gamma]$$ + 
               4 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
               4 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
               8 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ + 
               4 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
               16 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ - 
               16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
               24 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
               12 $CellContext`c$$^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
               28 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
               28 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
               4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
               12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
               24 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
               12 $CellContext`c$$^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
               16 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
               16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
               16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
               4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
               8 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
               4 $CellContext`c$$^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
               16 $CellContext`k^2 $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
               2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 - 
               8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
               8 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
               8 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
               16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
               16 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
               20 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
               8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
               8 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
               32 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
               20 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2 + 
               4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 - 
               12 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 + 
               16 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^3 - 
               8 $CellContext`k^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^3)^2 - 
             4 (4 $CellContext`k $CellContext`s$$^4 + 
              8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              8 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              4 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 + 
              4 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$^2) \
(-2 + 6 $CellContext`c$$ - 6 $CellContext`c$$^2 + 2 $CellContext`c$$^3 + 
              2 $CellContext`k - 4 $CellContext`c$$ $CellContext`k + 
              2 $CellContext`c$$^2 $CellContext`k + 8 $CellContext`s$$ - 
              24 $CellContext`c$$ $CellContext`s$$ + 
              24 $CellContext`c$$^2 $CellContext`s$$ - 
              8 $CellContext`c$$^3 $CellContext`s$$ - 
              8 $CellContext`k $CellContext`s$$ + 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$ - 
              8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ - 
              14 $CellContext`s$$^2 + 42 $CellContext`c$$ $CellContext`s$$^2 - 
              42 $CellContext`c$$^2 $CellContext`s$$^2 + 
              14 $CellContext`c$$^3 $CellContext`s$$^2 + 
              11 $CellContext`k $CellContext`s$$^2 - 
              22 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 + 
              11 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 + 
              2 $CellContext`k^2 $CellContext`s$$^2 - 
              2 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 + 
              12 $CellContext`s$$^3 - 36 $CellContext`c$$ $CellContext`s$$^3 + 
              36 $CellContext`c$$^2 $CellContext`s$$^3 - 
              12 $CellContext`c$$^3 $CellContext`s$$^3 - 
              6 $CellContext`k $CellContext`s$$^3 + 
              12 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 - 
              6 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 - 
              4 $CellContext`k^2 $CellContext`s$$^3 + 
              4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 - 
              4 $CellContext`s$$^4 + 12 $CellContext`c$$ $CellContext`s$$^4 - 
              12 $CellContext`c$$^2 $CellContext`s$$^4 + 
              4 $CellContext`c$$^3 $CellContext`s$$^4 + 
              2 $CellContext`k $CellContext`s$$^4 - 
              4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 + 
              2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 + \
$CellContext`k^3 $CellContext`s$$^4 + 
              4 $CellContext`k $CellContext`\[Gamma]$$ - 
              8 $CellContext`c$$ $CellContext`k $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$^2 $CellContext`k $CellContext`\[Gamma]$$ - 
              4 $CellContext`k^2 $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$ - 
              4 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              12 $CellContext`c$$ $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              12 $CellContext`c$$^2 $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$^3 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              10 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$ + 
              20 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ - 
              10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 
              16 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$ - 
              16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$ + 12 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
              36 $CellContext`c$$ $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              36 $CellContext`c$$^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              12 $CellContext`c$$^3 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
              10 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
              20 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ + 
              10 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              26 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$ + 
              
              26 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$ - 
              2 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$ - 
              12 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
              36 $CellContext`c$$ $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              36 $CellContext`c$$^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              12 $CellContext`c$$^3 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
              2 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ - 
              2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              16 $CellContext`k^2 $CellContext`s$$^3 $CellContext`\[Gamma]$$ - 
              16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$ + 
              6 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$ + 
              4 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              12 $CellContext`c$$ $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              12 $CellContext`c$$^2 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
              4 $CellContext`c$$^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              2 $CellContext`k $CellContext`s$$^4 $CellContext`\[Gamma]$$ + 
              4 $CellContext`c$$ $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
              2 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^4 \
$CellContext`\[Gamma]$$ - 
              6 $CellContext`k^3 $CellContext`s$$^4 $CellContext`\[Gamma]$$ - 
              2 $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
              2 $CellContext`c$$ $CellContext`k^2 $CellContext`\[Gamma]$$^2 + 
              2 $CellContext`k^3 $CellContext`\[Gamma]$$^2 + 
              8 $CellContext`k $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
              4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^2 + 
              4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^2 - 
              8 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^2 - 
              16 $CellContext`k $CellContext`s$$^2 $CellContext`\[Gamma]$$^2 + 
              32 $CellContext`c$$ $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
              16 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
              16 $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 - 
              16 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
              17 $CellContext`k^3 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^2 + 
              8 $CellContext`k $CellContext`s$$^3 $CellContext`\[Gamma]$$^2 - 
              16 $CellContext`c$$ $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
              8 $CellContext`c$$^2 $CellContext`k $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
              12 $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
              12 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 - 
              22 $CellContext`k^3 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^2 + 
              13 $CellContext`k^3 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^2 - 
              4 $CellContext`k^2 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
              4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$ \
$CellContext`\[Gamma]$$^3 + 
              6 $CellContext`k^3 $CellContext`s$$ $CellContext`\[Gamma]$$^3 + 
              4 $CellContext`k^2 $CellContext`s$$^2 $CellContext`\[Gamma]$$^3 - 
              4 $CellContext`c$$ $CellContext`k^2 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 - 
              18 $CellContext`k^3 $CellContext`s$$^2 \
$CellContext`\[Gamma]$$^3 + 
              24 $CellContext`k^3 $CellContext`s$$^3 \
$CellContext`\[Gamma]$$^3 - 
              12 $CellContext`k^3 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^3 + 
              4 $CellContext`k^3 $CellContext`s$$^2 $CellContext`\[Gamma]$$^4 - 
              8 $CellContext`k^3 $CellContext`s$$^3 $CellContext`\[Gamma]$$^4 + 
              4 $CellContext`k^3 $CellContext`s$$^4 \
$CellContext`\[Gamma]$$^4))^Rational[1, 2])}, {$CellContext`k, 0, 1.1}, 
         PlotRange -> {0, 1}, PlotStyle -> {Magenta, Thick}]], 
      "Specifications" :> {{{$CellContext`\[Gamma]$$, 0.5}, 0, 
         1}, {$CellContext`c$$, 0, 1}, {{$CellContext`s$$, 1}, 0.5, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{612., {375., 384.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.7407406858214207`*^9, 3.7407411381081715`*^9, 
  3.7407417869158616`*^9, 3.7408013649739156`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
  "Also", " ", "in", " ", "this", " ", "case", " ", "with", " ", "MS", " ", 
   "the", " ", "test", " ", "delivers", " ", "a", " ", "lot", " ", "of", " ", 
   "false", " ", "negative", " ", "and", " ", "false", " ", 
   RowBox[{"positive", "."}]}], "*)"}]], "Input",
 CellChangeTimes->{{3.740740798011812*^9, 3.74074082738442*^9}}]
}, Closed]]
}, Open  ]]
},
WindowSize->{1264, 583},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrintingCopies->1,
PrintingPageRange->{32000, 32000},
PrintingOptions->{"Magnification"->1.,
"PaperOrientation"->"Portrait",
"PaperSize"->{595.1999999999999, 841.98}},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
Magnification:>FEPrivate`If[
  FEPrivate`Equal[FEPrivate`$VersionNumber, 6.], 2., 2. Inherited],
FrontEndVersion->"9.0 for Microsoft Windows (64-bit) (November 20, 2012)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 844, 13, 607, "Title"],
Cell[CellGroupData[{
Cell[1449, 39, 156, 2, 159, "Section"],
Cell[1608, 43, 2933, 70, 1668, "Input"],
Cell[4544, 115, 221, 5, 268, "Input"],
Cell[CellGroupData[{
Cell[4790, 124, 1260, 36, 796, "Input"],
Cell[6053, 162, 711, 14, 186, "Output"],
Cell[6767, 178, 713, 14, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[7517, 197, 2007, 56, 1668, "Input"],
Cell[9527, 255, 1181, 32, 186, "Output"],
Cell[10711, 289, 1068, 28, 186, "Output"],
Cell[11782, 319, 810, 19, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[12629, 343, 2241, 53, 1668, "Input"],
Cell[14873, 398, 1939, 28, 186, "Output"],
Cell[16815, 428, 2204, 38, 186, "Output"],
Cell[19022, 468, 2081, 33, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[21140, 506, 1629, 45, 1492, "Input"],
Cell[22772, 553, 1225, 18, 186, "Output"],
Cell[24000, 573, 1488, 28, 186, "Output"],
Cell[25491, 603, 1473, 28, 186, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[27013, 637, 275, 3, 95, "Section"],
Cell[CellGroupData[{
Cell[27313, 644, 106, 1, 134, "Subsubsection"],
Cell[27422, 647, 453, 8, 274, "Input"],
Cell[CellGroupData[{
Cell[27900, 659, 1374, 34, 578, "Input"],
Cell[29277, 695, 853, 20, 232, "Output"],
Cell[30133, 717, 853, 20, 232, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[31023, 742, 3390, 83, 1808, "Input"],
Cell[34416, 827, 1461, 42, 186, "Output"],
Cell[35880, 871, 1512, 45, 186, "Output"],
Cell[37395, 918, 3796, 111, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[41228, 1034, 799, 19, 416, "Input"],
Cell[42030, 1055, 786, 11, 186, "Output"],
Cell[42819, 1068, 808, 12, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[43664, 1085, 299, 8, 180, "Input"],
Cell[43966, 1095, 648, 18, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[44651, 1118, 785, 17, 416, "Input"],
Cell[45439, 1137, 1804, 51, 186, "Output"],
Cell[47246, 1190, 2207, 65, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[49490, 1260, 930, 20, 416, "Input"],
Cell[50423, 1282, 828, 12, 186, "Output"],
Cell[51254, 1296, 828, 12, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[52119, 1313, 319, 7, 300, "Input"],
Cell[52441, 1322, 697, 16, 186, "Output"],
Cell[53141, 1340, 688, 16, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[53866, 1361, 1728, 35, 532, "Input"],
Cell[55597, 1398, 597, 10, 186, "Output"],
Cell[56197, 1410, 597, 10, 186, "Output"]
}, Open  ]],
Cell[56809, 1423, 559, 12, 300, "Input"],
Cell[CellGroupData[{
Cell[57393, 1439, 1176, 30, 532, "Input"],
Cell[58572, 1471, 716, 17, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[59325, 1493, 499, 12, 300, "Input"],
Cell[59827, 1507, 587, 17, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[60451, 1529, 618, 16, 416, "Input"],
Cell[61072, 1547, 1299, 37, 186, "Output"],
Cell[62374, 1586, 1466, 40, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[63877, 1631, 1170, 30, 648, "Input"],
Cell[65050, 1663, 1242, 34, 186, "Output"],
Cell[66295, 1699, 832, 20, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[67164, 1724, 1452, 37, 882, "Input"],
Cell[68619, 1763, 2917, 87, 476, "Output"],
Cell[71539, 1852, 1423, 41, 226, "Output"],
Cell[72965, 1895, 1473, 44, 226, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[74475, 1944, 646, 16, 350, "Input"],
Cell[75124, 1962, 2431, 74, 514, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[77604, 2042, 107, 1, 134, "Subsubsection"],
Cell[77714, 2045, 523, 10, 198, "Input"],
Cell[78240, 2057, 413, 8, 198, "Input"],
Cell[CellGroupData[{
Cell[78678, 2069, 1684, 44, 502, "Input"],
Cell[80365, 2115, 1450, 40, 232, "Output"],
Cell[81818, 2157, 798, 19, 224, "Output"],
Cell[82619, 2178, 998, 25, 232, "Output"]
}, Open  ]],
Cell[83632, 2206, 402, 8, 198, "Input"],
Cell[CellGroupData[{
Cell[84059, 2218, 1378, 41, 654, "Input"],
Cell[85440, 2261, 546, 11, 168, "Output"],
Cell[85989, 2274, 1135, 30, 302, "Output"],
Cell[87127, 2306, 637, 15, 232, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[87801, 2326, 854, 25, 274, "Input"],
Cell[88658, 2353, 483, 8, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[89178, 2366, 1454, 42, 578, "Input"],
Cell[90635, 2410, 844, 22, 232, "Output"],
Cell[91482, 2434, 581, 11, 222, "Output"],
Cell[92066, 2447, 522, 10, 216, "Output"],
Cell[92591, 2459, 678, 16, 230, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[93306, 2480, 1750, 38, 806, "Input"],
Cell[95059, 2520, 1596, 44, 446, "Output"],
Cell[96658, 2566, 680, 14, 168, "Output"],
Cell[97341, 2582, 885, 21, 262, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[98263, 2608, 2052, 53, 730, "Input"],
Cell[100318, 2663, 842, 20, 224, "Output"],
Cell[101163, 2685, 1047, 26, 262, "Output"],
Cell[102213, 2713, 824, 19, 230, "Output"]
}, Open  ]],
Cell[103052, 2735, 1275, 29, 654, "Input"],
Cell[CellGroupData[{
Cell[104352, 2768, 2615, 71, 806, "Input"],
Cell[106970, 2841, 9672, 276, 1514, "Output"],
Cell[116645, 3119, 1739, 50, 458, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[118421, 3174, 441, 10, 120, "Input"],
Cell[118865, 3186, 11652, 318, 1770, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[130554, 3509, 3144, 80, 958, "Input"],
Cell[133701, 3591, 4584, 146, 704, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[138322, 3742, 1652, 46, 552, "Input"],
Cell[139977, 3790, 3668, 66, 1788, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[143682, 3861, 951, 20, 324, "Input"],
Cell[144636, 3883, 2636, 74, 460, "Output"]
}, Open  ]],
Cell[147287, 3960, 2622, 72, 856, "Input"],
Cell[CellGroupData[{
Cell[149934, 4036, 791, 22, 324, "Input"],
Cell[150728, 4060, 478, 9, 168, "Output"]
}, Open  ]],
Cell[151221, 4072, 452, 8, 248, "Input"],
Cell[151676, 4082, 1791, 46, 552, "Input"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[153516, 4134, 553, 7, 95, "Section"],
Cell[CellGroupData[{
Cell[154094, 4145, 2312, 44, 972, "Input"],
Cell[156409, 4191, 452, 13, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[156898, 4209, 1462, 42, 1144, "Input"],
Cell[158363, 4253, 470, 10, 186, "Output"],
Cell[158836, 4265, 955, 28, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[159828, 4298, 1089, 28, 796, "Input"],
Cell[160920, 4328, 2341, 46, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[163298, 4379, 1271, 34, 1144, "Input"],
Cell[164572, 4415, 1121, 33, 186, "Output"],
Cell[165696, 4450, 622, 16, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[166355, 4471, 1210, 39, 616, "Input"],
Cell[167568, 4512, 369, 10, 186, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[167974, 4527, 986, 27, 448, "Input"],
Cell[168963, 4556, 998, 28, 186, "Output"],
Cell[169964, 4586, 2530, 48, 186, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[172543, 4640, 186, 4, 95, "Section"],
Cell[CellGroupData[{
Cell[172754, 4648, 103, 1, 170, "Subsection"],
Cell[172860, 4651, 1432, 40, 476, "Input"],
Cell[CellGroupData[{
Cell[174317, 4695, 1237, 36, 400, "Input"],
Cell[175557, 4733, 28305, 504, 1636, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[203911, 5243, 104, 1, 170, "Subsection"],
Cell[CellGroupData[{
Cell[204040, 5248, 373, 10, 170, "Input"],
Cell[204416, 5260, 1044, 21, 216, "Output"]
}, Open  ]],
Cell[205475, 5284, 366, 10, 170, "Input"],
Cell[CellGroupData[{
Cell[205866, 5298, 2310, 62, 730, "Input"],
Cell[208179, 5362, 30173, 515, 1840, "Output"]
}, Open  ]],
Cell[238367, 5880, 3899, 99, 1540, "Input"],
Cell[242269, 5981, 815, 22, 400, "Input"],
Cell[CellGroupData[{
Cell[243109, 6007, 246, 4, 248, "Input"],
Cell[243358, 6013, 299, 4, 244, "Output"],
Cell[243660, 6019, 225, 3, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[243922, 6027, 10728, 249, 3314, "Input"],
Cell[254653, 6278, 22614, 376, 1062, "Output"]
}, Open  ]]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[277328, 6661, 651, 9, 95, "Section"],
Cell[277982, 6672, 544, 10, 248, "Input"],
Cell[278529, 6684, 1324, 29, 628, "Input"],
Cell[279856, 6715, 298, 7, 170, "Input"],
Cell[CellGroupData[{
Cell[280179, 6726, 799, 23, 400, "Input"],
Cell[280981, 6751, 290, 5, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[281308, 6761, 793, 23, 476, "Input"],
Cell[282104, 6786, 803, 24, 246, "Output"],
Cell[282910, 6812, 893, 27, 226, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[283840, 6844, 2374, 68, 780, "Input"],
Cell[286217, 6914, 434, 10, 168, "Output"],
Cell[286654, 6926, 1872, 54, 400, "Output"],
Cell[288529, 6982, 256, 3, 168, "Output"]
}, Open  ]],
Cell[288800, 6988, 1241, 33, 400, "Input"],
Cell[CellGroupData[{
Cell[290066, 7025, 1323, 36, 400, "Input"],
Cell[291392, 7063, 3618, 68, 2124, "Output"]
}, Open  ]],
Cell[295025, 7134, 372, 7, 248, "Input"],
Cell[295400, 7143, 70, 1, 170, "Input"],
Cell[CellGroupData[{
Cell[295495, 7148, 2134, 51, 704, "Input"],
Cell[297632, 7201, 52784, 908, 1636, "Output"]
}, Open  ]],
Cell[350431, 8112, 1005, 19, 552, "Input"],
Cell[CellGroupData[{
Cell[351461, 8135, 3386, 93, 1312, "Input"],
Cell[354850, 8230, 147432, 2527, 1636, "Output"]
}, Open  ]],
Cell[502297, 10760, 821, 24, 400, "Input"],
Cell[CellGroupData[{
Cell[503143, 10788, 7705, 207, 3060, "Input"],
Cell[510851, 10997, 296569, 5048, 1744, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[807457, 16050, 8806, 226, 3440, "Input"],
Cell[816266, 16278, 86074, 1430, 1126, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[902389, 17714, 567, 9, 95, "Section"],
Cell[902959, 17725, 2252, 46, 1084, "Input"],
Cell[CellGroupData[{
Cell[905236, 17775, 437, 12, 170, "Input"],
Cell[905676, 17789, 220, 4, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[905933, 17798, 1534, 44, 780, "Input"],
Cell[907470, 17844, 889, 26, 224, "Output"],
Cell[908362, 17872, 2266, 45, 2012, "Output"],
Cell[910631, 17919, 465, 10, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[911133, 17934, 896, 21, 476, "Input"],
Cell[912032, 17957, 247, 7, 212, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[912316, 17969, 1158, 34, 324, "Input"],
Cell[913477, 18005, 2296, 46, 1524, "Output"]
}, Open  ]],
Cell[915788, 18054, 439, 9, 170, "Input"],
Cell[CellGroupData[{
Cell[916252, 18067, 2734, 73, 780, "Input"],
Cell[918989, 18142, 2134, 42, 1900, "Output"],
Cell[921126, 18186, 434, 6, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[921597, 18197, 3126, 81, 932, "Input"],
Cell[924726, 18280, 3350, 63, 2012, "Output"],
Cell[928079, 18345, 590, 8, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[928706, 18358, 2936, 72, 1084, "Input"],
Cell[931645, 18432, 34529, 575, 1640, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[966211, 19012, 3842, 96, 1160, "Input"],
Cell[970056, 19110, 3243, 61, 2116, "Output"],
Cell[973302, 19173, 1377, 34, 264, "Output"],
Cell[974682, 19209, 685, 9, 168, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[975404, 19223, 2666, 67, 1084, "Input"],
Cell[978073, 19292, 34911, 582, 1536, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1013021, 19879, 806, 21, 274, "Input"],
Cell[1013830, 19902, 193, 4, 224, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1014060, 19911, 4143, 92, 1464, "Input"],
Cell[1018206, 20005, 67957, 1124, 1062, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1086212, 21135, 610, 8, 190, "Section"],
Cell[1086825, 21145, 849, 18, 356, "Input"],
Cell[1087677, 21165, 325, 7, 120, "Input"],
Cell[CellGroupData[{
Cell[1088027, 21176, 2641, 73, 820, "Input"],
Cell[1090671, 21251, 1118, 29, 190, "Output"],
Cell[1091792, 21282, 634, 10, 180, "Output"],
Cell[1092429, 21294, 1049, 25, 190, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1093515, 21324, 2602, 67, 664, "Input"],
Cell[1096120, 21393, 2231, 60, 286, "Output"],
Cell[1098354, 21455, 881, 16, 118, "Output"],
Cell[1099238, 21473, 7703, 227, 1352, "Output"],
Cell[1106944, 21702, 1033, 20, 118, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1108014, 21727, 3607, 104, 678, "Input"],
Cell[1111624, 21833, 366, 7, 118, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1112027, 21845, 1800, 44, 664, "Input"],
Cell[1113830, 21891, 924, 20, 156, "Output"],
Cell[1114757, 21913, 711, 11, 180, "Output"],
Cell[1115471, 21926, 1003, 22, 180, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1116511, 21953, 1540, 43, 432, "Input"],
Cell[1118054, 21998, 2934, 56, 2088, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1121025, 22059, 1718, 44, 588, "Input"],
Cell[1122746, 22105, 2774, 54, 2088, "Output"],
Cell[1125523, 22161, 540, 14, 190, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1126100, 22180, 1153, 31, 356, "Input"],
Cell[1127256, 22213, 971, 29, 224, "Output"],
Cell[1128230, 22244, 2579, 48, 2088, "Output"]
}, Open  ]],
Cell[1130824, 22295, 656, 14, 300, "Input"],
Cell[CellGroupData[{
Cell[1131505, 22313, 1461, 43, 532, "Input"],
Cell[1132969, 22358, 2996, 58, 186, "Output"]
}, Open  ]],
Cell[1135980, 22419, 312, 7, 120, "Input"],
Cell[CellGroupData[{
Cell[1136317, 22430, 884, 24, 278, "Input"],
Cell[1137204, 22456, 1337, 43, 200, "Output"]
}, Open  ]],
Cell[1138556, 22502, 283, 6, 120, "Input"],
Cell[CellGroupData[{
Cell[1138864, 22512, 1108, 30, 278, "Input"],
Cell[1139975, 22544, 977, 28, 200, "Output"],
Cell[1140955, 22574, 603, 16, 180, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1141595, 22595, 1697, 51, 510, "Input"],
Cell[1143295, 22648, 2947, 57, 2088, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1146279, 22710, 1922, 55, 510, "Input"],
Cell[1148204, 22767, 3106, 59, 2088, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1151347, 22831, 2059, 55, 510, "Input"],
Cell[1153409, 22888, 810, 25, 206, "Output"],
Cell[1154222, 22915, 2205, 43, 1454, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1156464, 22963, 1255, 30, 432, "Input"],
Cell[1157722, 22995, 817, 24, 222, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1158576, 23024, 3312, 75, 820, "Input"],
Cell[1161891, 23101, 4204, 75, 2088, "Output"]
}, Open  ]],
Cell[1166110, 23179, 197, 4, 120, "Input"],
Cell[CellGroupData[{
Cell[1166332, 23187, 1662, 39, 432, "Input"],
Cell[1167997, 23228, 761, 12, 118, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1168795, 23245, 1299, 32, 432, "Input"],
Cell[1170097, 23279, 1156, 23, 118, "Output"],
Cell[1171256, 23304, 933, 15, 118, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1172226, 23324, 1185, 26, 432, "Input"],
Cell[1173414, 23352, 760, 14, 118, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1174211, 23371, 2023, 57, 432, "Input"],
Cell[1176237, 23430, 7120, 145, 2088, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1183394, 23580, 994, 30, 356, "Input"],
Cell[1184391, 23612, 1568, 52, 232, "Output"],
Cell[1185962, 23666, 1720, 57, 232, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1187719, 23728, 1009, 31, 200, "Input"],
Cell[1188731, 23761, 35586, 563, 1672, "Output"]
}, Open  ]],
Cell[1224332, 24327, 397, 8, 200, "Input"],
Cell[CellGroupData[{
Cell[1224754, 24339, 3204, 86, 896, "Input"],
Cell[1227961, 24427, 37440, 612, 2088, "Output"]
}, Open  ]],
Cell[1265416, 25042, 372, 7, 200, "Input"]
}, Closed]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
